Metrics for Destination given bearing on a great circle

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze1.2s (7.2%)

Memory

10.9MiB live, 1 277.6MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 35 to 25 computations (28.6% saved)

sample3.0s (17.2%)

Memory

67.9MiB live, 3 113.9MiB allocated

Samples

2.5s

8 256×

valid

Precisions

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

ival-sin: 749.0ms (34.3% of total)

ival-cos: 561.0ms (25.7% of total)

ival-mult: 456.0ms (20.9% of total)

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

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

ival-add: 92.0ms (4.2% of total)

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

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

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

Bogosity

explain447.0ms (2.6%)

Memory

-10.8MiB live, 468.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
5	2	(1.4827142708648928e+224 -3.2997043573534784e+128 -1.908482413298948e+193 -2.509505230445377e+76 3.65538154159906e-14)	2	(-3.628155012332366e+33 8.02438799992032e+178 4.5025335130908816e-222 7.32103735414061e+150 1.4471233946542626e+193)	`(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))`
1	0	-	0	-	`(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	1	0
`-.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	2

Confusion

	Predicted +	Predicted -
+	1	0
-	1	254

Precision

0.5

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	1	2	252

Precision?

0.25

Recall?

1.0

Freqs

test

number	freq
0	254
1	2

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

148.0ms

512×

valid

Compiler

Compiled 436 to 73 computations (83.3% saved)

Precisions

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

ival-sin: 41.0ms (34% of total)

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

ival-mult: 22.0ms (18.2% of total)

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

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

ival-add: 5.0ms (4.1% of total)

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

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

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

preprocess255.0ms (1.5%)

Memory

2.8MiB live, 79.7MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Symmetry

(abs phi2)

Compiler

Compiled 38 to 23 computations (39.5% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

99.7%

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

Compiler

Compiled 38 to 23 computations (39.5% saved)

simplify51.0ms (0.3%)

Memory

9.1MiB live, 46.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)))

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize137.0ms (0.8%)

Memory

1.2MiB live, 115.3MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.25	(.f64 (sin.f64 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.336572734286441	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) (.f64 (sin.f64 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

115.0ms

256×

valid

Compiler

Compiled 199 to 25 computations (87.4% saved)

Precisions

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

ival-sin: 43.0ms (54.9% of total)

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

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

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

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

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

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

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

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

series41.0ms (0.2%)

Memory

21.5MiB live, 57.9MiB allocated

Counts

8 → 288

Calls

Call 1

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

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

Calls

72 calls:

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

simplify350.0ms (2%)

Memory

22.9MiB live, 367.4MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	iter limit
1×	node limit

Counts

288 → 286

Calls

Call 1

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

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

rewrite333.0ms (1.9%)

Memory

16.5MiB live, 482.6MiB allocated

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

8 → 340

Calls

Call 1

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

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

eval250.0ms (1.4%)

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

prune109.0ms (0.6%)

Memory

-0.7MiB live, 199.0MiB allocated

Pruning

21 alts after pruning (21 fresh and 0 done)

	Pruned	Kept	Total
New	605	21	626
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	606	21	627

Accuracy

100.0%

Counts

627 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	42.9%	(/.f64 (.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
	99.8%	(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
	99.7%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
▶	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 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))
	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) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
	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 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
	87.4%	(+.f64 lambda1 (atan2.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)))))))))
	90.1%	(+.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))))))
	92.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 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
▶	99.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)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
▶	84.1%	(+.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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))))
	83.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))))))
	81.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 delta (.f64 delta (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))))
	79.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	80.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
▶	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	61.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	31.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 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))

Compiler

Compiled 1 758 to 946 computations (46.2% saved)

simplify303.0ms (1.8%)

Memory

11.9MiB live, 321.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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	640	(fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))
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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
cost-diff	128	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
cost-diff	128	(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
cost-diff	6592	(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))

Rules

16 506×	`lower-fma.f32`
16 496×	`lower-fma.f64`
2 740×	`lower-*.f32`
2 698×	`lower-*.f64`
2 568×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	81	1135
0	139	1117
1	250	1099
2	483	1093
3	1138	1071
4	2434	1071
5	3535	1071
6	4460	1071
7	5837	1071
8	6526	1071
9	6891	1071
10	7596	1071
0	8198	1051

Stop Event

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

Calls

Call 1

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

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

localize427.0ms (2.5%)

Memory

-15.5MiB live, 544.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) (.f64 (sin.f64 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	1.6964559759960283	(.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1 binary64))))
accuracy	13.550781250000002	(fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))
accuracy	31.65214512478141	#s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))))))
accuracy	0.19131749970117154	(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.25	(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.2421875	(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))
accuracy	31.276581918241703	#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))
accuracy	0.15691376953688402	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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.16796875	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	26.83289983484832	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.23046875	(.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1)))
accuracy	0.5295301764557668	(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
accuracy	15.977837213965802	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))

Samples

123.0ms	77×	2	valid
81.0ms	131×	0	valid
53.0ms	48×	1	valid

Compiler

Compiled 938 to 61 computations (93.5% saved)

Precisions

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

ival-mult: 54.0ms (29.2% of total)

ival-cos: 40.0ms (21.6% of total)

ival-sin: 27.0ms (14.6% of total)

adjust: 22.0ms (11.9% of total)

ival-add: 15.0ms (8.1% of total)

const: 7.0ms (3.8% of total)

ival-atan2: 7.0ms (3.8% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

series94.0ms (0.5%)

Memory

47.5MiB live, 155.7MiB allocated

Counts

27 → 912

Calls

Call 1

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

Outputs
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (cos (* 2 phi1))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 -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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow delta 2))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))) (taylor 0 delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow delta 4)) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- 1/120 (* 1/6 (/ 1 (pow delta 2))))) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2))))) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2))))) (taylor inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow delta 4)) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- 1/120 (* 1/6 (/ 1 (pow delta 2))))) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2))))) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2))))) (taylor -inf delta) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))) #<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 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.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 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (patch (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* 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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))) #<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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))) #<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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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)))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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))))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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))))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<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 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (patch #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (+ (* -1/6 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))) (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (+ (* -1/6 (pow delta 2)) (+ (* 1/120 (pow delta 4)) (* (pow theta 2) (+ (* -1/6 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (* 1/120 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ 1 (+ (* -1/6 (pow delta 2)) (+ (* 1/120 (pow delta 4)) (* (pow theta 2) (+ (* -1/6 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))) (* 1/120 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))))))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin theta) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (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) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (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) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 4) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 4) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) (patch (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())

Calls

228 calls:

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

simplify391.0ms (2.3%)

Memory

10.5MiB live, 472.2MiB allocated

Algorithm

1×	egg-herbie

Rules

14 876×	`lower-fma.f64`
14 876×	`lower-fma.f32`
8 290×	`lower-*.f64`
8 290×	`lower-*.f32`
3 944×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	545	20919
1	1893	20471
2	6648	20364
0	8471	19390

Stop Event

1×	iter limit
1×	node limit

Counts

912 → 902

Calls

Call 1

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

Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (cos.f64 delta) (.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/720 binary64) #s(literal 1/720 binary64)) (.f64 delta (neg.f64 delta)) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(* -1 (* (pow phi1 2) (cos delta)))
(.f64 (cos.f64 delta) (neg.f64 (.f64 phi1 phi1)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (cos.f64 delta) (.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64)) (neg.f64 (cos.f64 delta))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (cos.f64 delta) #s(literal 1/3 binary64) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/315 binary64) (*.f64 phi1 phi1) #s(literal -2/45 binary64))))) (neg.f64 (cos.f64 delta))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 delta delta) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 delta delta) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 delta delta) #s(literal -1/24 binary64))) (.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64))) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 theta) (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1))) (cos.f64 delta)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (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))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 theta theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (sin.f64 theta) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow delta 2)))
(fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(* 1/120 (pow delta 4))
(.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)))
(* (pow delta 4) (- 1/120 (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))
(* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 delta delta) (.f64 delta delta))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 delta delta) (.f64 delta delta))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* 1/120 (pow delta 4))
(.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)))
(* (pow delta 4) (- 1/120 (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))
(* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 delta delta) (.f64 delta delta))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* (pow delta 4) (- (+ 1/120 (/ 1 (pow delta 4))) (* 1/6 (/ 1 (pow delta 2)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 delta delta) (.f64 delta delta))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (cos.f64 theta))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 delta) (.f64 phi1 #s(literal -1/6 binary64)) (.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (cos.f64 theta)))) (cos.f64 delta)) (.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal -1/2 binary64) (.f64 theta theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (.f64 theta theta) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 theta theta)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) #s(literal -1/2 binary64)))) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(neg.f64 (.f64 (fma.f64 phi1 (.f64 phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)) phi1))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) #s(literal -2/15 binary64)) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 theta))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(.f64 phi1 (-.f64 (.f64 (.f64 phi1 phi1) (fma.f64 (neg.f64 (.f64 phi1 phi1)) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) #s(literal -4/315 binary64)) (.f64 (cos.f64 theta) #s(literal 2/15 binary64))) (.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 delta (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 (cos.f64 delta) phi1 (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 delta)) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 delta) phi1))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.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))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) delta)) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(+ (* 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) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 theta theta))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 theta theta))) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 delta (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* delta (* phi1 (cos theta)))
(.f64 delta (.f64 phi1 (cos.f64 theta)))
(* phi1 (+ phi1 (* delta (cos theta))))
(*.f64 phi1 (fma.f64 delta (cos.f64 theta) phi1))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta)))))))))
(.f64 phi1 (fma.f64 delta (cos.f64 theta) (fma.f64 (.f64 phi1 phi1) (.f64 delta (.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1)))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta))))))))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 delta (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (.f64 phi1 #s(literal -1/3 binary64))) #s(literal 1 binary64)) (.f64 delta (cos.f64 theta))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)))
(+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))))
(fma.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1))) (.f64 #s(literal -1/2 binary64) (*.f64 theta theta))))
(+ (* (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 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1)))) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))))
(+ (* (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 (.f64 theta theta) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 delta #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1)))) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 delta (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 (cos.f64 delta) phi1 (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 delta)) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 (cos.f64 delta) phi1))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 theta theta))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 theta theta))) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.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))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) delta)) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(+ (* 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) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal -1/2 binary64) (.f64 theta theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (fma.f64 (.f64 theta theta) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 theta theta)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) #s(literal -1/2 binary64)))) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (cos.f64 theta))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 delta) (.f64 phi1 #s(literal -1/6 binary64)) (.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (cos.f64 theta)))) (cos.f64 delta)) (.f64 (sin.f64 delta) (cos.f64 theta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (sin.f64 theta) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 theta (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* theta (+ 1 (+ (* -1/6 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))) (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))))
(fma.f64 theta (fma.f64 #s(literal -1/6 binary64) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (.f64 delta delta)) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)))) theta)
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (+ (* 1/120 (pow delta 4)) (* (pow theta 2) (+ (* -1/6 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (* 1/120 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))))))))))
(fma.f64 theta (fma.f64 (.f64 theta theta) (.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (.f64 delta (.f64 delta #s(literal -1/6 binary64))))) theta)
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (+ (* 1/120 (pow delta 4)) (* (pow theta 2) (+ (* -1/6 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))) (* 1/120 (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))))))))))
(fma.f64 theta (fma.f64 (.f64 theta theta) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (.f64 (.f64 theta theta) (.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))))) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (.f64 delta (.f64 delta #s(literal -1/6 binary64))))) theta)
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* (sin theta) (+ 1 (+ (* -1/6 (pow delta 2)) (* 1/120 (pow delta 4)))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 delta (*.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))
(fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 theta))
(+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))
(fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 theta))
(* 1/120 (* (pow delta 4) (sin theta)))
(.f64 (.f64 (sin.f64 theta) #s(literal 1/120 binary64)) (.f64 (.f64 delta delta) (*.f64 delta delta)))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* 1/120 (* (pow delta 4) (sin theta)))
(.f64 (.f64 (sin.f64 theta) #s(literal 1/120 binary64)) (.f64 (.f64 delta delta) (*.f64 delta delta)))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta)))))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (pow delta 4) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 delta (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 (cos.f64 delta) phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))

rewrite658.0ms (3.8%)

Memory

-292.8MiB live, 481.6MiB allocated

Rules

4 704×	`lower-*.f32`
4 664×	`lower-*.f64`
4 074×	`lower-fma.f32`
4 064×	`lower-fma.f64`
3 390×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	81	726
0	139	686
1	477	655
2	3399	650
0	8934	645

Stop Event

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

Counts

27 → 668

Calls

Call 1

Inputs
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64))))))
(.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1 binary64))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 delta) (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (pow.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (cos.f64 delta)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) lambda1) (.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))))
(+.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (*.f64 delta #s(literal -1/6 binary64))))
(+.f64 (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(+.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64))
(+.f64 (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64)))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (/.f64 (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 delta (.f64 (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(fma.f64 (.f64 delta delta) #s(literal -1/6 binary64) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(fma.f64 (.f64 delta delta) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 delta delta) (.f64 (.f64 (.f64 delta delta) #s(literal 1/120 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 delta delta) (.f64 delta delta)) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 (.f64 delta delta) #s(literal 1/120 binary64)) (.f64 delta delta) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 (.f64 delta delta) #s(literal 1/120 binary64)) (.f64 (.f64 delta delta) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (fma.f64 (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 delta delta))) (.f64 (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 delta delta))) #s(literal 1/1728000 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 delta (.f64 (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal 1 binary64)) (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))))) (.f64 delta (*.f64 delta #s(literal -1/6 binary64))))
(fma.f64 (fma.f64 delta (.f64 (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal -1 binary64))) (.f64 delta (*.f64 delta #s(literal -1/6 binary64))))
(fma.f64 (.f64 delta #s(literal 1/120 binary64)) (.f64 delta (.f64 delta delta)) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 delta #s(literal -1/6 binary64)) delta (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(fma.f64 (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) delta (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/120 binary64) (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 (.f64 delta delta) (.f64 delta #s(literal 1/120 binary64))) delta (+.f64 #s(literal 1 binary64) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))))
(/.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))))
(/.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))))
(/.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta))))) (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta))))) (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64))))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))) (neg.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal 1 binary64)) (fma.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (*.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))) (.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal 1 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64)))) (neg.f64 (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (*.f64 delta delta) #s(literal 1/120 binary64)))) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) #s(literal 1/36 binary64))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))) #s(literal -1 binary64))
(.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (*.f64 delta delta)) #s(literal 1/36 binary64)))))
(.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 0 binary64)) (.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))) (.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (neg.f64 (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(-.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (neg.f64 (sin.f64 phi1)))) #s(literal -2 binary64))
(.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)))
(.f64 (sin.f64 phi1) (neg.f64 (.f64 (cos.f64 phi1) (cos.f64 theta))))
(.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))
(.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(fma.f64 #s(literal -1 binary64) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (neg.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (neg.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)))) (.f64 (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))) (.f64 (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))))))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))))
(fma.f64 (cos.f64 theta) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 delta (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)))))
(fma.f64 (.f64 delta (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 delta (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 delta (cos.f64 theta))) (cos.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (sin.f64 phi1) (-.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) (sin.f64 phi1)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (-.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) (sin.f64 phi1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (sin.f64 phi1) (-.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) (sin.f64 phi1))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (sin.f64 phi1) (-.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)))) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(.f64 (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 phi1))
(+.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(+.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (/.f64 (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(fma.f64 #s(literal -1 binary64) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (neg.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (neg.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) (.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (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 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(+.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi1) (.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))) #s(literal -1 binary64))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 1/2 binary64))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 0 binary64)) (.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (cos.f64 theta)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))) (.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (neg.f64 (neg.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))))
(.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(+.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(+.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (sin.f64 theta) (.f64 delta (*.f64 delta #s(literal -1/6 binary64)))))
(+.f64 (.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))))) (.f64 (sin.f64 theta) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (sin.f64 theta)) (.f64 #s(literal 1 binary64) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (*.f64 (sin.f64 theta) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) (sin.f64 theta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (.f64 delta delta) (.f64 #s(literal -1/6 binary64) (sin.f64 theta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))))
(fma.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (sin.f64 theta) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64)))) (sin.f64 theta) (*.f64 #s(literal 1 binary64) (sin.f64 theta)))
(fma.f64 (.f64 delta #s(literal -1/6 binary64)) (.f64 delta (sin.f64 theta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 theta) #s(literal -1/6 binary64)) (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 theta) (.f64 delta delta)) #s(literal -1/6 binary64) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 theta) (.f64 delta #s(literal -1/6 binary64))) delta (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta delta)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(/.f64 (.f64 (sin.f64 theta) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta))))) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (*.f64 delta delta)) #s(literal 1/36 binary64))))
(/.f64 (.f64 (sin.f64 theta) (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(/.f64 (.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))) (sin.f64 theta)) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (*.f64 delta delta)) #s(literal 1/36 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (sin.f64 theta)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta delta)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 theta) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (.f64 (sin.f64 theta) (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))))) (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (*.f64 delta delta)) #s(literal 1/36 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 theta) (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (neg.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 delta (.f64 delta delta))) (.f64 delta (.f64 delta delta)))) (sin.f64 theta))) (neg.f64 (fma.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (.f64 delta (.f64 delta #s(literal -1/6 binary64)))) (.f64 (.f64 (.f64 delta delta) (*.f64 delta delta)) #s(literal 1/36 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))) (sin.f64 theta))) (neg.f64 (-.f64 (.f64 delta (.f64 delta #s(literal -1/6 binary64))) (fma.f64 delta (.f64 delta (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))
(.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))
(.f64 (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)) (sin.f64 theta))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(+.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 delta)) (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))
(fma.f64 (.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta)))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))))

eval346.0ms (2%)

Memory: 4.5MiB live, 577.1MiB allocated
Compiler: Compiled 84 315 to 4 564 computations (94.6% saved)

prune290.0ms (1.7%)

Memory

-6.1MiB live, 525.6MiB allocated

Pruning

35 alts after pruning (35 fresh and 0 done)

	Pruned	Kept	Total
New	1 799	29	1 828
Fresh	10	6	16
Picked	5	0	5
Done	0	0	0
Total	1 814	35	1 849

Accuracy

100.0%

Counts

1 849 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.8%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
	77.0%	(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (.f64 (.f64 delta delta) #s(literal 1/120 binary64))) #s(literal 1 binary64)))))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
	99.7%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	72.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 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))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	99.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 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))))
	90.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
	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 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
	80.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
▶	92.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
	90.1%	(+.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))))))
	87.4%	(+.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) #s(approx (+ ( (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
	83.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))))))
	74.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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 phi1 (fma.f64 delta (cos.f64 theta) phi1)))))))
	79.4%	(+.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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))))
	92.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))))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
▶	79.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	80.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
	74.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #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))))
	61.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	61.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))))))))
▶	79.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))))
	75.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	43.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx ( (sin theta) (+ (* -1/6 (* delta delta)) (+ (* (* delta delta) (* 1/120 (* delta delta))) 1))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	77.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	85.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos 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 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
▶	85.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	53.1%	(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
	99.7%	#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))))))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1))
	31.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 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))

Compiler

Compiled 2 500 to 1 486 computations (40.6% saved)

simplify313.0ms (1.8%)

Memory

25.9MiB live, 294.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

13 026×	`lower-fma.f32`
13 018×	`lower-fma.f64`
3 478×	`lower-*.f32`
3 446×	`lower-*.f64`
2 016×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	82	941
0	138	933
1	235	908
2	421	908
3	921	908
4	2123	908
5	3497	908
6	4363	908
7	5453	908
8	5917	908
9	6220	908
10	6315	908
11	6378	908
12	6425	908
13	7107	908
14	7680	908
15	7972	908
0	8005	887

Stop Event

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

Calls

Call 1

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

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

localize588.0ms (3.4%)

Memory

-23.6MiB live, 751.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.5295301764557668	(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
accuracy	15.977837213965802	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
accuracy	28.037084068008994	#s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
accuracy	0.2421875	(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))
accuracy	31.276581918241703	#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))
accuracy	31.284541471473144	#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.24351503907376806	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.3937879792518203	(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy	29.152505723600186	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
accuracy	0.15691376953688402	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy	0.203125	(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy	25.289151635309274	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
accuracy	26.83289983484832	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.22722626953688405	(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy	0.23046875	(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))
accuracy	0.3937879792518203	(+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
accuracy	15.977837213965802	(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))

Samples

203.0ms	77×	2	valid
101.0ms	131×	0	valid
75.0ms	48×	1	valid

Compiler

Compiled 810 to 68 computations (91.6% saved)

Precisions

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

ival-cos: 93.0ms (30.5% of total)

ival-mult: 82.0ms (26.9% of total)

ival-add: 32.0ms (10.5% of total)

adjust: 30.0ms (9.8% of total)

ival-sin: 29.0ms (9.5% of total)

ival-sub: 10.0ms (3.3% of total)

ival-atan2: 10.0ms (3.3% of total)

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

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

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

exact: 1.0ms (0.3% of total)

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

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

series70.0ms (0.4%)

Memory

8.3MiB live, 125.9MiB allocated

Counts

31 → 912

Calls

Call 1

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

Outputs
#s(alt 1 (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow phi1 2)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (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 (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf theta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf delta) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.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 -inf phi1) (#s(alt (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (cos (* 2 phi1))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor -inf phi1) (#s(alt (.f64 #s(literal 2 binary64) phi1) (patch (.f64 #s(literal 2 binary64) phi1) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos theta)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))))))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi1)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 (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 (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 (* 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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))) #<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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))) #<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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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)))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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))))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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))))))) (* (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.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 (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.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 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (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 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())

Calls

228 calls:

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

simplify380.0ms (2.2%)

Memory

-13.5MiB live, 557.5MiB allocated

Algorithm

1×	egg-herbie

Rules

13 472×	`lower-fma.f64`
13 472×	`lower-fma.f32`
8 200×	`lower-*.f64`
8 200×	`lower-*.f32`
3 506×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	518	18729
1	1767	18132
2	6214	17951
0	8561	17113

Stop Event

1×	iter limit
1×	node limit

Counts

912 → 904

Calls

Call 1

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

Outputs
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64))) #s(literal 1 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* -1 (pow phi1 2))
(*.f64 phi1 (neg.f64 phi1))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64)))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/315 binary64) #s(literal -2/45 binary64)) #s(literal 1/3 binary64)) #s(literal -1 binary64)))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (neg (* -2 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* -1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (.f64 phi1 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (.f64 phi1 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (.f64 phi1 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 phi1 (*.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64))) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 delta (.f64 delta (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 delta (.f64 delta (fma.f64 (.f64 delta delta) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/720 binary64)) (.f64 delta (neg.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(* -1 (* (pow phi1 2) (cos delta)))
(.f64 phi1 (.f64 phi1 (neg.f64 (cos.f64 delta))))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 phi1 (.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal 1/315 binary64) #s(literal -2/45 binary64))) (*.f64 #s(literal 1/3 binary64) (cos.f64 delta))) (neg.f64 (cos.f64 delta))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 delta delta) #s(literal -1 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (fma.f64 (.f64 delta delta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (fma.f64 delta (.f64 delta #s(literal 1/720 binary64)) #s(literal -1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64)))) #s(literal 1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (*.f64 phi1 #s(literal -1/3 binary64))) phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64))) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (*.f64 phi1 #s(literal -1/3 binary64))) phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64))) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* phi1 (cos theta))
(*.f64 phi1 (cos.f64 theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (.f64 (cos.f64 theta) #s(literal 2/15 binary64))) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (.f64 (cos.f64 theta) #s(literal -4/315 binary64))) (.f64 (cos.f64 theta) #s(literal 2/15 binary64))) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 theta)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (sin phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/24 binary64)))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 theta theta))) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (.f64 phi1 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (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 delta (fma.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) delta)) (.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))) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 theta (.f64 theta (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64)))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (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 delta (fma.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) delta)) (.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))) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 theta (.f64 theta (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64)))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64))) #s(literal 1 binary64))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (*.f64 phi1 #s(literal -1/3 binary64))) phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64))) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(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))
(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))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (cos.f64 delta)) (.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (cos.f64 delta) #s(literal -1/3 binary64)) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.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))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (*.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1)))) (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 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 (.f64 delta #s(literal -1/6 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta)) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 phi1) (.f64 (.f64 theta theta) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 theta theta))) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+.f64 (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 phi1) (.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))))) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 theta theta))) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (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 delta (fma.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) delta)) (.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))) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 delta))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.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 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 theta (.f64 theta (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64)))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* delta (* phi1 (cos theta)))
(.f64 phi1 (.f64 delta (cos.f64 theta)))
(* phi1 (+ phi1 (* delta (cos theta))))
(*.f64 phi1 (fma.f64 delta (cos.f64 theta) phi1))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta)))))))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (.f64 delta (cos.f64 theta)) #s(literal -2/3 binary64)) #s(literal 1 binary64)) (.f64 delta (cos.f64 theta))))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta))))))))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 #s(literal -1/3 binary64) (.f64 (.f64 delta (cos.f64 theta)) #s(literal -2/3 binary64))) #s(literal 1 binary64)) (.f64 delta (cos.f64 theta))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))
(+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))))
(+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (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 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 delta (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (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)))))))))
(+.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 phi1))))) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 delta (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 delta (cos.f64 theta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(.f64 phi1 (.f64 (cos.f64 theta) (-.f64 #s(literal -1 binary64) (.f64 #s(literal -2/3 binary64) (.f64 phi1 phi1)))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (.f64 phi1 (.f64 phi1 (.f64 (cos.f64 theta) #s(literal -2/15 binary64))))) (.f64 (cos.f64 theta) (-.f64 #s(literal -1 binary64) (.f64 #s(literal -2/3 binary64) (.f64 phi1 phi1))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (-.f64 #s(literal -1 binary64) (.f64 #s(literal -2/3 binary64) (.f64 phi1 phi1))) (neg.f64 (.f64 (fma.f64 phi1 (.f64 phi1 (.f64 (cos.f64 theta) #s(literal -4/315 binary64))) (.f64 (cos.f64 theta) #s(literal 2/15 binary64))) (.f64 (.f64 phi1 phi1) (.f64 phi1 phi1))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 theta theta))) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)))

rewrite343.0ms (2%)

Memory

36.4MiB live, 421.5MiB allocated

Rules

5 224×	`lower-*.f32`
5 192×	`lower-*.f64`
4 640×	`lower-fma.f32`
4 634×	`lower-fma.f64`
2 556×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	79	623
0	131	607
1	443	555
2	3117	555
0	8507	545

Stop Event

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

Counts

31 → 542

Calls

Call 1

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

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

eval477.0ms (2.8%)

Memory: 23.4MiB live, 449.7MiB allocated
Compiler: Compiled 55 368 to 3 488 computations (93.7% saved)

prune493.0ms (2.9%)

Memory

-43.1MiB live, 562.5MiB allocated

Pruning

53 alts after pruning (52 fresh and 1 done)

	Pruned	Kept	Total
New	1 493	41	1 534
Fresh	19	11	30
Picked	4	1	5
Done	0	0	0
Total	1 516	53	1 569

Accuracy

100.0%

Counts

1 569 → 53

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)) (cos.f64 delta)))) lambda1)
	92.0%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 #s(approx (* (sin phi1) (* (cos phi1) (cos theta))) (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
	80.0%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	79.2%	(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
	85.9%	(+.f64 (atan2.f64 #s(approx (* (sin theta) (* (sin delta) (cos phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) lambda1)
	99.9%	(+.f64 #s(approx (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (* (sin delta) (neg (* (sin phi1) (* (cos phi1) (cos theta))))) (* (+ (neg (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1)))))) lambda1)
	99.7%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	72.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 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))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	80.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	90.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (+.f64 #s(approx (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
▶	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
	80.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	90.1%	(+.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))))))
	87.4%	(+.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) #s(approx (+ ( (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
	79.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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64)))))
	79.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
	80.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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	39.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 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
	76.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))
	73.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))))
	79.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
	79.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
	69.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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
	79.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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)))))
	59.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64))))))
	76.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) #s(literal 1 binary64)))))
	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (fma.f64 #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
▶	68.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	74.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	78.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
	43.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx ( (sin theta) (+ (* -1/6 (* delta delta)) (+ (* (* delta delta) (* 1/120 (* delta delta))) 1))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	71.9%	(+.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))))
	85.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
	82.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))))))
	75.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	85.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	57.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)))))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	75.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	51.8%	(.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))) (/.f64 #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))))))) (cos.f64 delta))))))
	99.8%	#s(approx (+ (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (* (sin delta) (neg (* (sin phi1) (* (cos phi1) (cos theta))))) (* (+ (neg (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)))) lambda1) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1) lambda1))
	32.0%	#s(approx (+ (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (* (sin delta) (neg (* (sin phi1) (* (cos phi1) (cos theta))))) (* (+ (neg (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)))) lambda1) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))))
	31.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 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))

Compiler

Compiled 3 373 to 2 103 computations (37.7% saved)

simplify257.0ms (1.5%)

Memory

32.5MiB live, 269.8MiB 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 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
cost-diff	0	#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
cost-diff	0	(.f64 #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))))
cost-diff	0	#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
cost-diff	0	(.f64 #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
cost-diff	0	#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff	128	(*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta)))
cost-diff	192	(+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1)))
cost-diff	192	(fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
cost-diff	384	(/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))

Rules

9 816×	`lower-fma.f32`
9 808×	`lower-fma.f64`
3 062×	`lower-*.f32`
3 036×	`lower-*.f64`
2 252×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	84	977
0	140	965
1	227	961
2	387	957
3	642	957
4	892	957
5	1234	957
6	1757	957
7	2467	957
8	3180	957
9	4145	957
10	5403	957
11	6691	957
12	7428	957
13	7902	957
0	8121	939

Stop Event

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

Calls

Call 1

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

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

localize304.0ms (1.8%)

Memory

4.9MiB live, 521.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.16796875	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.203125	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.2698892200378375	(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
accuracy	28.037084068008994	#s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
accuracy	0.4575857081818404	(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))
accuracy	16.963849592494032	#s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))
accuracy	31.276581918241703	#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))
accuracy	31.284541471473144	#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
accuracy	0.24351503907376806	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.3937879792518203	(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy	29.152505723600186	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
accuracy	31.293356444766534	#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
accuracy	0.15691376953688402	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy	25.289151635309274	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
accuracy	26.83289983484832	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	31.284541471473144	#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
accuracy	0.14453125	(*.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta)))
accuracy	0.15691376953688402	(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
accuracy	0.22722626953688405	(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
accuracy	0.2698892200378375	(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))

Samples

183.0ms

256×

valid

Compiler

Compiled 755 to 66 computations (91.3% saved)

Precisions

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

ival-mult: 59.0ms (40.6% of total)

ival-sin: 26.0ms (17.9% of total)

ival-cos: 19.0ms (13.1% of total)

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

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

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

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

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

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

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

exact: 1.0ms (0.7% of total)

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

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

series89.0ms (0.5%)

Memory

12.8MiB live, 168.1MiB allocated

Counts

31 → 972

Calls

Call 1

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

Outputs
#s(alt phi1 (taylor 0 phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -2/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* (pow phi1 2) (- (* 2/15 (pow phi1 2)) 2/3)))) (taylor 0 phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/15 (* -4/315 (pow phi1 2)))) 2/3)))) (taylor 0 phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (* 2 phi1))) (taylor inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (* 2 phi1))) (taylor inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (* 2 phi1))) (taylor inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (* 2 phi1))) (taylor inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (neg (* -2 phi1)))) (taylor -inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (neg (* -2 phi1)))) (taylor -inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (neg (* -2 phi1)))) (taylor -inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (neg (* -2 phi1)))) (taylor -inf phi1) (#s(alt (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (patch (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* delta (* (cos theta) (sin (* 2 phi1))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1/2 (* delta (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (* (cos theta) (sin (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (* delta (+ (* -1/2 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 1/12 (* delta (* (cos theta) (sin (* 2 phi1))))))))))) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* 2/3 (* phi1 (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* 1/4 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (pow theta 2) (+ (* -1/48 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1))))) (* 1/4 (* (sin delta) (sin (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (pow theta 2) (+ (* 1/4 (* (sin delta) (sin (* 2 phi1)))) (* (pow theta 2) (+ (* -1/48 (* (sin delta) (sin (* 2 phi1)))) (* 1/1440 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (patch (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 phi1) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 2 (* -4/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 2 (* (pow phi1 2) (- (* 4/15 (pow phi1 2)) 4/3)))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4/15 (* -8/315 (pow phi1 2)))) 4/3)))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 2 phi1)) (taylor inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 2 phi1)) (taylor inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 2 phi1)) (taylor inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 2 phi1)) (taylor inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) (patch (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* 2/3 (* (pow phi1 2) (cos theta))))) (taylor 0 phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -2/15 (* (pow phi1 2) (cos theta))) (* 2/3 (cos theta)))))) (taylor 0 phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 2/3 (cos theta)) (* (pow phi1 2) (+ (* -2/15 (cos theta)) (* 4/315 (* (pow phi1 2) (cos theta))))))))) (taylor 0 phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin (* 2 phi1))) (taylor 0 theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (sin (* 2 phi1))) (* 1/4 (* (pow theta 2) (sin (* 2 phi1))))) (taylor 0 theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (sin (* 2 phi1))) (* (pow theta 2) (+ (* -1/48 (* (pow theta 2) (sin (* 2 phi1)))) (* 1/4 (sin (* 2 phi1)))))) (taylor 0 theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (sin (* 2 phi1))) (* (pow theta 2) (+ (* 1/4 (sin (* 2 phi1))) (* (pow theta 2) (+ (* -1/48 (sin (* 2 phi1))) (* 1/1440 (* (pow theta 2) (sin (* 2 phi1))))))))) (taylor 0 theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor -inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor -inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor -inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (taylor -inf theta) (#s(alt (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (patch (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (patch (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<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 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<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 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) (patch (atan2.f64 (.f64 #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) (patch (.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (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 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (patch (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (patch (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 (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 (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 (* 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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) #<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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) #<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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) (patch #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ phi1 (* delta (cos theta)))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (taylor 0 theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf delta) (#s(alt #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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 #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))) (patch #s(approx ( (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (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)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) (patch (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(approx (* (sin phi1) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1)))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (patch #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) #<representation binary64>) () ())) ())

Calls

243 calls:

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

simplify489.0ms (2.8%)

Memory

-20.9MiB live, 432.0MiB allocated

Algorithm

1×	egg-herbie

Rules

13 616×	`lower-fma.f64`
13 616×	`lower-fma.f32`
8 214×	`lower-*.f64`
8 214×	`lower-*.f32`
3 068×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	20484
1	1875	19851
2	6473	19740
0	8239	18843

Stop Event

1×	iter limit
1×	node limit

Counts

972 → 963

Calls

Call 1

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

Outputs
phi1
(* phi1 (+ 1 (* -2/3 (pow phi1 2))))
(fma.f64 phi1 (.f64 #s(literal -2/3 binary64) (.f64 phi1 phi1)) phi1)
(* phi1 (+ 1 (* (pow phi1 2) (- (* 2/15 (pow phi1 2)) 2/3))))
(fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 2/15 binary64) #s(literal -2/3 binary64)) (.f64 phi1 (*.f64 phi1 phi1)) phi1)
(* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/15 (* -4/315 (pow phi1 2)))) 2/3))))
(fma.f64 (.f64 phi1 phi1) (.f64 (fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal -4/315 binary64) #s(literal 2/15 binary64))) #s(literal -2/3 binary64)) phi1) phi1)
(* 1/2 (sin (* 2 phi1)))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (* 2 phi1)))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (* 2 phi1)))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (* 2 phi1)))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (neg (* -2 phi1))))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (neg (* -2 phi1))))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (neg (* -2 phi1))))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(* 1/2 (sin (neg (* -2 phi1))))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal 2 binary64))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (* delta (* (cos theta) (sin (* 2 phi1))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 theta)) (.f64 #s(literal -1/2 binary64) delta) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1/2 (* delta (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (* (cos theta) (sin (* 2 phi1))))))))
(fma.f64 (.f64 delta #s(literal -1/2 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) delta (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1/2 (* (cos theta) (sin (* 2 phi1)))) (* delta (+ (* -1/2 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 1/12 (* delta (* (cos theta) (sin (* 2 phi1)))))))))))
(fma.f64 delta (fma.f64 delta (fma.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 theta)) (.f64 delta #s(literal 1/12 binary64)) (fma.f64 (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal -1/4 binary64) #s(literal -1/4 binary64))) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 theta)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* 2/3 (* phi1 (* (cos theta) (sin delta)))))))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 delta) #s(literal -1/2 binary64))))
(+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* 1/4 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (sin.f64 delta)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 theta theta)))))
(+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (pow theta 2) (+ (* -1/48 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1))))) (* 1/4 (* (sin delta) (sin (* 2 phi1))))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (sin.f64 delta)) (fma.f64 #s(literal -1/48 binary64) (*.f64 theta theta) #s(literal 1/4 binary64))))))
(+ (* -1/2 (* (sin delta) (sin (* 2 phi1)))) (+ (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (pow theta 2) (+ (* 1/4 (* (sin delta) (sin (* 2 phi1)))) (* (pow theta 2) (+ (* -1/48 (* (sin delta) (sin (* 2 phi1)))) (* 1/1440 (* (pow theta 2) (* (sin delta) (sin (* 2 phi1)))))))))))
(+.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (sin.f64 delta)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 theta theta))))) (.f64 (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (sin.f64 delta)) (fma.f64 #s(literal 1/1440 binary64) (.f64 theta theta) #s(literal -1/48 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)))))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
(* phi1 (+ 2 (* -4/3 (pow phi1 2))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 #s(literal -4/3 binary64)) #s(literal 2 binary64)))
(* phi1 (+ 2 (* (pow phi1 2) (- (* 4/15 (pow phi1 2)) 4/3))))
(.f64 phi1 (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal 4/15 binary64) #s(literal -4/3 binary64))) #s(literal 2 binary64)))
(* phi1 (+ 2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 4/15 (* -8/315 (pow phi1 2)))) 4/3))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -8/315 binary64) #s(literal 4/15 binary64)) #s(literal -4/3 binary64)) #s(literal 2 binary64)))
(sin (* 2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (* 2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (* 2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (* 2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (neg (* -2 phi1)))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (neg (* -2 phi1)))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (neg (* -2 phi1)))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(sin (neg (* -2 phi1)))
(sin.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* 2/3 (* (pow phi1 2) (cos theta)))))
(.f64 phi1 (.f64 (cos.f64 theta) (fma.f64 #s(literal 2/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -2/15 (* (pow phi1 2) (cos theta))) (* 2/3 (cos theta))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (fma.f64 #s(literal -2/15 binary64) (.f64 phi1 phi1) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 theta))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 2/3 (cos theta)) (* (pow phi1 2) (+ (* -2/15 (cos theta)) (* 4/315 (* (pow phi1 2) (cos theta)))))))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (fma.f64 #s(literal 2/3 binary64) (.f64 phi1 phi1) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (fma.f64 #s(literal 4/315 binary64) (.f64 phi1 phi1) #s(literal -2/15 binary64))) (.f64 (.f64 phi1 phi1) (.f64 phi1 phi1)))))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (neg (* -2 phi1)))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (neg (* -2 phi1)))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (neg (* -2 phi1)))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (neg (* -2 phi1)))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (sin (* 2 phi1)))
(.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))))
(+ (* -1/2 (sin (* 2 phi1))) (* 1/4 (* (pow theta 2) (sin (* 2 phi1)))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 theta theta) #s(literal -1/2 binary64)))
(+ (* -1/2 (sin (* 2 phi1))) (* (pow theta 2) (+ (* -1/48 (* (pow theta 2) (sin (* 2 phi1)))) (* 1/4 (sin (* 2 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))) (.f64 (.f64 theta theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (fma.f64 #s(literal -1/48 binary64) (.f64 theta theta) #s(literal 1/4 binary64)))))
(+ (* -1/2 (sin (* 2 phi1))) (* (pow theta 2) (+ (* 1/4 (sin (* 2 phi1))) (* (pow theta 2) (+ (* -1/48 (sin (* 2 phi1))) (* 1/1440 (* (pow theta 2) (sin (* 2 phi1)))))))))
(fma.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (.f64 theta theta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/1440 binary64) (.f64 theta theta) #s(literal -1/48 binary64))) (.f64 (.f64 theta theta) (*.f64 theta theta))))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(* -1/2 (* (cos theta) (sin (* 2 phi1))))
(.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 delta (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 delta (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 delta (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1))))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 delta (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 2 phi1))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (neg (* -2 phi1)))))) (* (cos delta) (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (.f64 phi1 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(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))
(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))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (cos.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (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 #s(literal -1/2 binary64) (.f64 (.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 delta (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (.f64 delta #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (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 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64))) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* delta (* phi1 (cos theta)))
(.f64 phi1 (.f64 delta (cos.f64 theta)))
(* phi1 (+ phi1 (* delta (cos theta))))
(*.f64 phi1 (fma.f64 delta (cos.f64 theta) phi1))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta)))))))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (.f64 delta (.f64 (cos.f64 theta) #s(literal -2/3 binary64))) #s(literal 1 binary64)) (.f64 delta (cos.f64 theta))))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta))))))))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 delta (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (.f64 phi1 #s(literal -1/3 binary64))) #s(literal 1 binary64)) (.f64 delta (cos.f64 theta))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)))
(+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 delta (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.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 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 delta (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal 1/24 binary64))) (.f64 (.f64 delta (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (sin.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)))) (* (pow theta 2) (+ (* -1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/24 (* delta (* (cos phi1) (sin phi1)))))))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1))) (.f64 (.f64 (.f64 theta theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (.f64 delta #s(literal -1/720 binary64)))) (.f64 (.f64 delta (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 delta (cos.f64 phi1)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 delta (cos.f64 phi1)))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 delta (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.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 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(.f64 phi1 (.f64 (cos.f64 theta) (fma.f64 #s(literal 2/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (fma.f64 #s(literal -2/15 binary64) (.f64 phi1 phi1) #s(literal 2/3 binary64))) (neg.f64 (cos.f64 theta))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (neg.f64 (.f64 phi1 phi1)) (fma.f64 (cos.f64 theta) #s(literal -1/144 binary64) (.f64 (cos.f64 theta) #s(literal -29/5040 binary64)))) (.f64 (cos.f64 theta) (fma.f64 #s(literal -2/15 binary64) (.f64 phi1 phi1) #s(literal 2/3 binary64)))) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 (.f64 theta theta) (*.f64 theta theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))

rewrite270.0ms (1.6%)

Memory

-15.8MiB live, 175.6MiB allocated

Rules

1 778×	`lower-fma.f32`
1 770×	`lower-fma.f64`
1 696×	`lower-*.f32`
1 670×	`lower-*.f64`
1 102×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	83	760
0	138	731
1	461	707
0	3130	692

Stop Event

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

Counts

31 → 301

Calls

Call 1

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

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

eval329.0ms (1.9%)

Memory: 6.3MiB live, 244.1MiB allocated
Compiler: Compiled 44 794 to 2 221 computations (95% saved)

prune421.0ms (2.4%)

Memory

22.3MiB live, 502.0MiB allocated

Pruning

61 alts after pruning (56 fresh and 5 done)

	Pruned	Kept	Total
New	1 293	20	1 313
Fresh	11	36	47
Picked	1	4	5
Done	0	1	1
Total	1 305	61	1 366

Accuracy

100.0%

Counts

1 366 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64)))))) lambda1)
	87.5%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) #s(approx (+ (* 1/2 (cos (+ phi1 phi1))) 1/2) #s(literal 1 binary64))))) lambda1)
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) lambda1)
	92.1%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) #s(approx (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
	80.0%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (+ (* (sin delta) (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta)))) (* (cos delta) (+ (* 1/2 (cos (+ phi1 phi1))) 1/2))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))) lambda1)
	80.5%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (+ (* (sin delta) (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta)))) (* (cos delta) (+ (* 1/2 (cos (+ phi1 phi1))) 1/2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 theta)) (.f64 #s(literal -1/2 binary64) delta) #s(literal 1/2 binary64))))) lambda1)
	99.9%	(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
	68.6%	(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	85.9%	(+.f64 (atan2.f64 #s(approx (* (sin theta) (* (sin delta) (cos phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
	99.7%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	72.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 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))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	80.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
	90.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (+.f64 #s(approx (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
✓	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
	80.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	90.1%	(+.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))))))
	87.4%	(+.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) #s(approx (+ ( (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
	79.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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64)))))
	79.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))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
	80.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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	39.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 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
	76.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))
	73.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))))
	79.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
	79.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
	69.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 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
	79.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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64)))))
	59.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64))))))
	76.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) #s(literal 1 binary64)))))
	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	68.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
✓	68.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	61.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))
	74.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	61.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))))))
	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) (fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) #s(literal 1 binary64))))))
	67.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- 1 (pow (sin phi1) 2)) #s(literal 1 binary64)))))
✓	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (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) (+ (* (cos theta) (* delta (cos phi1))) (sin phi1))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) delta (sin.f64 phi1))))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	78.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
	43.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx ( (sin theta) (+ (* -1/6 (* delta delta)) (+ (* (* delta delta) (* 1/120 (* delta delta))) 1))) (.f64 (.f64 (.f64 delta delta) (.f64 delta delta)) (fma.f64 (sin.f64 theta) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (.f64 delta delta))) (/.f64 (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 delta delta)))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	71.9%	(+.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))))
	76.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))) (fma.f64 #s(approx (* (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
	85.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 #s(approx ( (neg (sin phi1)) (* (cos theta) (cos phi1))) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
	82.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta)))))))
	75.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	85.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	57.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)))))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 delta (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
	73.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	75.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	51.8%	(.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))) (/.f64 #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))))))) (cos.f64 delta))))))
	99.8%	#s(approx (+ (atan2 (* (sin theta) (* (sin delta) (cos phi1))) (+ (* (sin delta) (neg (* (sin phi1) (* (cos phi1) (cos theta))))) (* (+ (neg (+ (* (cos (+ phi1 phi1)) -1/2) 1/2)) 1) (cos delta)))) lambda1) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 (cos.f64 phi1))))) lambda1) lambda1))

Compiler

Compiled 5 290 to 1 784 computations (66.3% saved)

regimes226.0ms (1.3%)

Memory

-3.3MiB live, 399.4MiB allocated

Counts

112 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

32.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))))))))
32.0ms	theta
32.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)))))))))
31.0ms	phi2
30.0ms	phi1

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes177.0ms (1%)

Memory

-28.7MiB live, 291.3MiB allocated

Counts

88 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

26.0ms	lambda1
24.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)))))))))
24.0ms	phi1
24.0ms	theta
24.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
99.9%	1	`lambda1`
99.9%	1	`phi1`
99.9%	1	`phi2`
99.9%	1	`delta`
99.9%	1	`theta`
99.9%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.9%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes152.0ms (0.9%)

Memory

21.9MiB live, 380.1MiB allocated

Counts

74 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

22.0ms	delta
21.0ms	lambda1
21.0ms	phi1
21.0ms	theta
21.0ms	phi2

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes156.0ms (0.9%)

Memory

2.2MiB live, 364.1MiB allocated

Counts

72 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

28.0ms	phi2
22.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))))))))
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	delta
20.0ms	phi1

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes144.0ms (0.8%)

Memory

-16.0MiB live, 300.9MiB allocated

Counts

71 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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))))))))
21.0ms	delta
20.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)))))))))
20.0ms	theta
19.0ms	phi2

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes121.0ms (0.7%)

Memory

1.3MiB live, 242.2MiB allocated

Counts

57 → 1

Calls

Call 1

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

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:

21.0ms	phi1
17.0ms	delta
16.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)))))))))
16.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	theta

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes95.0ms (0.5%)

Memory

19.4MiB live, 173.9MiB allocated

Counts

39 → 3

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

20.0ms	delta
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))))))))
12.0ms	phi1
12.0ms	theta
11.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
87.2%	1	`phi2`
90.3%	3	`delta`
87.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)))))))))`
87.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))))))))`
87.2%	1	`lambda1`
87.2%	1	`phi1`
87.2%	1	`theta`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes36.0ms (0.2%)

Memory

5.8MiB live, 41.3MiB allocated

Counts

31 → 1

Calls

Call 1

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

Outputs

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

Calls

3 calls:

16.0ms	theta
9.0ms	phi1
9.0ms	delta

Results

Accuracy	Segments	Branch
87.2%	1	`phi1`
87.2%	1	`theta`
87.2%	1	`delta`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes59.0ms (0.3%)

Memory

-5.7MiB live, 76.1MiB allocated

Counts

21 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes31.0ms (0.2%)

Memory

7.9MiB live, 44.7MiB allocated

Counts

10 → 3

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

8.0ms	theta
4.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)))))))))
4.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
4.0ms	delta
4.0ms	phi1

Results

Accuracy	Segments	Branch
75.0%	1	`phi2`
75.0%	1	`lambda1`
75.0%	1	`phi1`
82.1%	3	`delta`
82.0%	3	`theta`
78.3%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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.8%	3	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes4.0ms (0%)

Memory

6.1MiB live, 6.1MiB allocated

Counts

9 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

3.0ms

delta

Results

Accuracy	Segments	Branch
82.1%	3	`delta`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes5.0ms (0%)

Memory

8.1MiB live, 8.1MiB allocated

Counts

5 → 3

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

2.0ms	theta
2.0ms	delta

Results

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

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes42.0ms (0.2%)

Memory

-30.3MiB live, 7.2MiB allocated

Counts

4 → 3

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

39.0ms	delta
2.0ms	theta

Results

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

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes8.0ms (0%)

Memory

12.2MiB live, 12.2MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 92 to 60 computations (34.8% saved)

bsearch114.0ms (0.7%)

Memory

11.0MiB live, 130.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
45.0ms	1.6880848828384337e-13	1.5911443504657377e-6
63.0ms	-1.199847446381038e-5	-3.6239514059296654e-23

Samples

95.0ms

304×

valid

Compiler

Compiled 839 to 582 computations (30.6% saved)

Precisions

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

ival-asin: 26.0ms (30.8% of total)

ival-sin: 21.0ms (24.8% of total)

ival-cos: 19.0ms (22.5% of total)

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

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

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

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

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

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

bsearch121.0ms (0.7%)

Memory

-16.1MiB live, 223.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
49.0ms	1.5911443504657377e-6	362.04621824062093
65.0ms	-67420195231828.44	-1709.4461427329443

Samples

97.0ms

304×

valid

Compiler

Compiled 1 111 to 656 computations (41% saved)

Precisions

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

ival-sin: 27.0ms (32.1% of total)

ival-cos: 20.0ms (23.8% of total)

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

ival-sub: 10.0ms (11.9% of total)

ival-asin: 7.0ms (8.3% of total)

ival-atan2: 5.0ms (5.9% of total)

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

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

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

bsearch107.0ms (0.6%)

Memory

9.8MiB live, 130.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
52.0ms	1.5911443504657377e-6	362.04621824062093
50.0ms	-67420195231828.44	-1709.4461427329443

Samples

91.0ms

256×

valid

Compiler

Compiled 921 to 580 computations (37% saved)

Precisions

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

ival-mult: 31.0ms (38% of total)

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

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

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

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

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

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

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

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

bsearch2.0ms (0%)

Memory

2.9MiB live, 2.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.5911443504657377e-6	362.04621824062093
1.0ms	-67420195231828.44	-1709.4461427329443

Compiler

Compiled 858 to 544 computations (36.6% saved)

bsearch82.0ms (0.5%)

Memory

-8.1MiB live, 111.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
35.0ms	4.6592904069699424e-12	8.160378704567562e-10
41.0ms	-0.3102407457970701	-9.125366933339191e-8

Samples

64.0ms

256×

valid

Compiler

Compiled 617 to 383 computations (37.9% saved)

Precisions

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

ival-sin: 18.0ms (32.3% of total)

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

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

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

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

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

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

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

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

simplify24.0ms (0.1%)

Memory

-1.8MiB live, 33.9MiB allocated

Algorithm

1×	egg-herbie

Rules

80×	`*-commutative_binary64`
48×	`+-commutative_binary64`
20×	`sub-neg_binary64`
18×	`neg-sub0_binary64`
18×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	172	1125
1	229	1125
2	246	1125
3	264	1125
4	278	1125
5	288	1125
6	293	1125

Stop Event

1×

saturated

Calls

Call 1

Inputs
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (+ (* (sin delta) (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta)))) (* (cos delta) (+ (* 1/2 (cos (+ phi1 phi1))) 1/2))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) #s(approx (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.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))))))
(if (<=.f64 delta #s(literal -1770887431076117/295147905179352825856 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 8500259669165361/9444732965739290427392 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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 delta #s(literal -1100000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 6980579422424269/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)))))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (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))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (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))))))
(if (<=.f64 theta #s(literal -8669969714643489/9223372036854775808 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 7737125245533627/9671406556917033397649408 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (/.f64 (sin.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (+ (* (sin delta) (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta)))) (* (cos delta) (+ (* 1/2 (cos (+ phi1 phi1))) 1/2))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (+ (* (sin delta) (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta)))) (* (cos delta) (+ (* 1/2 (cos (+ phi1 phi1))) 1/2))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 (.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 delta) #s(literal -1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 (+.f64 phi1 phi1)))) (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) #s(approx (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) #s(approx (* (/ (+ 0 (sin (+ phi1 phi1))) 2) (neg (cos theta))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 phi1 #s(literal -2 binary64))))) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.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))))))
(if (<=.f64 delta #s(literal -1770887431076117/295147905179352825856 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 8500259669165361/9444732965739290427392 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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -1770887431076117/295147905179352825856 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 8500259669165361/9444732965739290427392 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (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))))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 delta #s(literal -1100000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 6980579422424269/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)))))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -1100000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 6980579422424269/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) #s(literal 1/120 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)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (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))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (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))))))
(if (<=.f64 delta #s(literal -8500000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5620492334958379/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 theta #s(literal -8669969714643489/9223372036854775808 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 7737125245533627/9671406556917033397649408 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 theta #s(literal -8669969714643489/9223372036854775808 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 7737125245533627/9671406556917033397649408 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

soundness1.9s (11.1%)

Memory

-67.6MiB live, 1 406.5MiB allocated

Rules

18 094×	`lower-fma.f64`
18 094×	`lower-fma.f32`
14 876×	`lower-fma.f64`
14 876×	`lower-fma.f32`
13 616×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	20484
1	1875	19851
2	6473	19740
0	8239	18843
0	83	760
0	138	731
1	461	707
0	3130	692
0	22	147
0	40	139
1	120	139
2	846	139
0	8744	133
0	518	18729
1	1767	18132
2	6214	17951
0	8561	17113
0	545	20919
1	1893	20471
2	6648	20364
0	8471	19390
0	281	5807
1	976	5684
2	3423	5625
3	5995	5582
0	8162	5302
0	81	726
0	139	686
1	477	655
2	3399	650
0	8934	645
0	79	623
0	131	607
1	443	555
2	3117	555
0	8507	545

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×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit
1×	iter limit
1×	node limit

Compiler

Compiled 1 408 to 712 computations (49.4% saved)

preprocess143.0ms (0.8%)

Memory: -0.6MiB live, 271.2MiB allocated
Remove: (abs phi2)
Compiler: Compiled 1 794 to 756 computations (57.9% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze1.2s (7.2%)

sample3.0s (17.2%)

explain447.0ms (2.6%)

preprocess255.0ms (1.5%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify51.0ms (0.3%)

localize137.0ms (0.8%)

series41.0ms (0.2%)

simplify350.0ms (2%)

rewrite333.0ms (1.9%)

eval250.0ms (1.4%)

prune109.0ms (0.6%)

simplify303.0ms (1.8%)

localize427.0ms (2.5%)

series94.0ms (0.5%)

simplify391.0ms (2.3%)

rewrite658.0ms (3.8%)

eval346.0ms (2%)

prune290.0ms (1.7%)

simplify313.0ms (1.8%)

localize588.0ms (3.4%)

series70.0ms (0.4%)

simplify380.0ms (2.2%)

rewrite343.0ms (2%)

eval477.0ms (2.8%)

prune493.0ms (2.9%)

simplify257.0ms (1.5%)

localize304.0ms (1.8%)

series89.0ms (0.5%)

simplify489.0ms (2.8%)

rewrite270.0ms (1.6%)

eval329.0ms (1.9%)

prune421.0ms (2.4%)

regimes226.0ms (1.3%)

regimes177.0ms (1%)

regimes152.0ms (0.9%)

regimes156.0ms (0.9%)

regimes144.0ms (0.8%)

regimes121.0ms (0.7%)

regimes95.0ms (0.5%)

regimes36.0ms (0.2%)

regimes59.0ms (0.3%)

regimes31.0ms (0.2%)

regimes4.0ms (0%)

regimes5.0ms (0%)

regimes42.0ms (0.2%)

regimes8.0ms (0%)

bsearch114.0ms (0.7%)

bsearch121.0ms (0.7%)

bsearch107.0ms (0.6%)

bsearch2.0ms (0%)

bsearch82.0ms (0.5%)

simplify24.0ms (0.1%)

soundness1.9s (11.1%)

preprocess143.0ms (0.8%)

end0.0ms (0%)

Profiling