Metrics for Spherical law of cosines

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze947.0ms (4.6%)

Memory

7.0MiB live, 1 230.7MiB 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 21 to 19 computations (9.5% saved)

sample5.7s (27.5%)

Memory

-236.2MiB live, 10 603.0MiB allocated

Samples

4.5s	6 269×	1	valid
592.0ms	1 968×	0	valid
40.0ms	19×	2	valid

Precisions

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

ival-cos: 1.7s (39.6% of total)

ival-sin: 951.0ms (22.4% of total)

ival-mult: 631.0ms (14.9% of total)

ival-acos: 405.0ms (9.5% of total)

adjust: 321.0ms (7.6% of total)

ival-add: 128.0ms (3% of total)

ival-sub: 115.0ms (2.7% of total)

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

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

Bogosity

explain361.0ms (1.7%)

Memory

19.3MiB live, 448.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
71	118	(-32886958.54961812 6.067295386359392e+239 -7.329040713494576e-77 -2.7712876952791585e+159 1.5637933943353177e+248)	1	(-4.5228886696619753e-246 -45.05828707415025 -1.980920990575106e-7 -9.291638338012877e-118 9.542347075911555e+46)	`(cos.f64 (-.f64 lambda1 lambda2))`
22	1	(-5.84733056281835e-253 -4.91792556221332e+128 8.216730832405573e-247 -2.9546827413468135e+147 4.6411303777487063e+195)	0	-	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
0	0	-	0	-	`lambda2`
0	0	-	0	-	`phi2`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`R`
0	0	-	0	-	`(sin.f64 phi1)`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	0	-	`(*.f64 (sin.f64 phi1) (sin.f64 phi2))`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(sin.f64 phi2)`
0	0	-	0	-	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
0	0	-	0	-	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	0	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (-.f64 lambda1 lambda2))`	sensitivity	188	1
`acos.f64`	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`	sensitivity	23	2

Confusion

	Predicted +	Predicted -
+	90	0
-	118	48

Precision

0.4326923076923077

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	90	0	0
-	118	3	45

Precision?

0.4265402843601896

Recall?

1.0

Freqs

test

number	freq
0	48
1	205
2	3

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

208.0ms	382×	1	valid
26.0ms	122×	0	valid
8.0ms	8×	2	valid

Compiler

Compiled 299 to 72 computations (75.9% saved)

Precisions

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

ival-cos: 84.0ms (41.3% of total)

ival-sin: 47.0ms (23.1% of total)

ival-mult: 25.0ms (12.3% of total)

adjust: 17.0ms (8.4% of total)

ival-acos: 17.0ms (8.4% of total)

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

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

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

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

preprocess237.0ms (1.1%)

Memory

-3.9MiB live, 33.7MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	129	399
1	273	393
2	460	385
3	803	385
4	1522	385
5	1993	385
6	2268	385
7	2744	385
8	3277	385
9	3803	385
10	4429	385
11	4716	385
12	4910	385
13	4948	385
14	6292	385
15	6766	385
16	6878	385
17	6894	385
18	6894	385
19	6910	385
20	6910	385
21	6990	385
22	7022	385
23	7022	385
0	17	19
0	29	19
1	38	19
2	50	19
3	58	19
4	67	19
5	83	19
6	116	19
7	141	19
8	185	19
9	201	19
10	209	19
0	209	18

Stop Event

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

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))

Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

Compiler

Compiled 19 to 17 computations (10.5% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	74.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Compiler

Compiled 19 to 17 computations (10.5% saved)

simplify7.0ms (0%)

Memory

10.5MiB live, 10.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	92
0	29	92
1	38	92
2	50	92
3	58	92
4	67	92
5	83	92
6	116	92
7	141	92
8	185	92
9	201	92
10	209	92
0	209	89

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

Outputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

localize155.0ms (0.7%)

Memory

-22.3MiB live, 184.2MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.17806625976844204	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	0.22265625	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
accuracy	4.120542659534251	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda1 lambda2))

Samples

118.0ms	191×	1	valid
12.0ms	61×	0	valid
4.0ms	4×	2	valid

Compiler

Compiled 186 to 36 computations (80.6% saved)

Precisions

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

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

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

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

adjust: 8.0ms (7.7% of total)

ival-acos: 8.0ms (7.7% of total)

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

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

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

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

series35.0ms (0.2%)

Memory

14.9MiB live, 52.4MiB allocated

Counts

6 → 252

Calls

Call 1

Inputs
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))

Calls

15 calls:

Time	Variable		Point	Expression
4.0ms	lambda2	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
4.0ms	phi2	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
3.0ms	lambda2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
3.0ms	lambda1	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms	phi2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))

simplify279.0ms (1.3%)

Memory

3.1MiB live, 227.9MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	219	4017
1	686	3929
2	2187	3840
3	3632	3804
4	8000	3804
0	8218	3588

Stop Event

1×	iter limit
1×	node limit

Counts

252 → 252

Calls

Call 1

Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi1) lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 lambda1 (.f64 #s(literal 1/6 binary64) lambda1) #s(literal -1 binary64))) lambda1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 lambda1 (.f64 #s(literal 1/6 binary64) lambda1) #s(literal -1 binary64))) lambda1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (fma.f64 lambda2 (.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (.f64 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/6 binary64) lambda2) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 lambda2 (.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (.f64 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/6 binary64) lambda2) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (sin.f64 phi2) (fma.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 phi1 phi1) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 (sin.f64 phi2) phi1))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (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 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (.f64 (sin.f64 phi1) (fma.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi1) phi2))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (.f64 (sin.f64 phi1) (fma.f64 (.f64 phi2 phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 (sin.f64 phi1) phi2))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (fma.f64 (.f64 phi2 phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))

rewrite184.0ms (0.9%)

Memory

31.7MiB live, 265.3MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	71
0	29	71
1	83	71
2	554	71
3	7204	71
0	8426	68

Stop Event

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

Counts

6 → 281

Calls

Call 1

Inputs
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))

Outputs
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) (-.f64 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(.f64 (pow.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))))
(.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64)))
(.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64))))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal -1 binary64))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64))) (+.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (pow.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 9 binary64))) (pow.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 9 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 9 binary64))) (.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (sin.f64 phi2)) (/.f64 (sin.f64 phi2) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (sin.f64 phi1)) (/.f64 (sin.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (sin.f64 (.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 (sin.f64 (.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64)) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (/.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sin.f64 phi2) (/.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (sin.f64 phi2)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (/.f64 (.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(/.f64 (.f64 R (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (.f64 R (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 R (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 R (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -1/2 binary64))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 #s(literal -2 binary64) (/.f64 (.f64 (sin.f64 (.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(.f64 #s(literal -2 binary64) (.f64 (.f64 (sin.f64 (.f64 (-.f64 (+.f64 (+.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (neg.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64))))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(-.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(cos.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (+.f64 lambda2 lambda1)))
(cos.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))
(cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (.f64 lambda1 lambda1))))))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (neg.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal -2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))

eval175.0ms (0.8%)

Memory: -35.1MiB live, 135.4MiB allocated
Compiler: Compiled 20 366 to 1 760 computations (91.4% saved)

prune122.0ms (0.6%)

Memory

28.7MiB live, 182.4MiB allocated

Pruning

50 alts after pruning (50 fresh and 0 done)

	Pruned	Kept	Total
New	483	50	533
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	484	50	534

Accuracy

94.1%

Counts

534 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	73.9%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	74.0%	(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
	73.9%	(/.f64 (.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
▶	74.0%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	72.3%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	73.1%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	74.1%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
	74.0%	(.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	73.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	62.1%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
▶	93.6%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
▶	53.8%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	74.2%	(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	61.6%	(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
	61.8%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	74.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	74.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
	74.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
	44.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
	42.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	35.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
	36.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
	36.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
	43.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
	45.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	39.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	39.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	46.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	74.1%	(.f64 (acos.f64 (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
	43.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	49.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	55.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	51.1%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	74.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
	37.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
	38.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	43.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
▶	45.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)

Compiler

Compiled 3 500 to 2 462 computations (29.7% saved)

simplify145.0ms (0.7%)

Memory

-8.4MiB live, 143.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
cost-diff	320	(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff	704	(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
cost-diff	14976	(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff	0	(PI.f64)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (PI.f64))
cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
cost-diff	448	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
cost-diff	0	#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
cost-diff	0	(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff	0	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff	128	(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff	0	(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
cost-diff	0	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
cost-diff	0	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff	0	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
cost-diff	0	(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
cost-diff	0	(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff	0	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
cost-diff	13440	(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	749
0	132	739
1	215	734
2	378	722
3	735	722
4	1351	714
5	2148	714
6	2811	714
7	4439	696
8	6149	696
0	8976	678

Stop Event

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

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi1)
phi1
R
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64))
(*.f64 #s(literal -1/6 binary64) phi1)
#s(literal -1/6 binary64)
phi1
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) phi1)
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
R
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
R

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 R (acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi1)
phi1
R
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal -1/6 binary64) phi1) (sin.f64 phi2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (*.f64 (fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal -1/6 binary64) phi1) (sin.f64 phi2)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (*.f64 (fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal -1/6 binary64) phi1) (sin.f64 phi2))))
#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal -1/6 binary64) phi1) (sin.f64 phi2)))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal -1/6 binary64) phi1) (sin.f64 phi2))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64))
(*.f64 #s(literal -1/6 binary64) phi1)
#s(literal -1/6 binary64)
phi1
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) phi1)
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (neg.f64 R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(PI.f64)
R
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 1/2 binary64))) R)
(acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (*.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 1/2 binary64))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
R

localize896.0ms (4.3%)

Memory

22.4MiB live, 1 040.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	9.34785899614474	(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
accuracy	13.30001502936633	(cos.f64 (+.f64 phi2 phi1))
accuracy	13.482093144459116	(cos.f64 (-.f64 phi2 phi1))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.3046875	(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy	0.546186458114042	(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	3.7384329135121925	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.4953242719357503	(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
accuracy	4.120542659534251	(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	30.0647120556759	#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
accuracy	0.22265625	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
accuracy	4.120542659534251	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	27.9280109257556	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	0.18263627930532605	(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	0.1875	(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy	0.22265625	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy	4.120542659534251	(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))

Samples

604.0ms	246×	1	valid
19.0ms	4×	2	valid
4.0ms	6×	0	valid

Compiler

Compiled 1 446 to 144 computations (90% saved)

Precisions

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

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

ival-mult: 116.0ms (21.2% of total)

ival-sin: 112.0ms (20.5% of total)

adjust: 37.0ms (6.8% of total)

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

ival-sub: 28.0ms (5.1% of total)

ival-acos: 27.0ms (4.9% of total)

ival-asin: 13.0ms (2.4% of total)

ival-div: 7.0ms (1.3% of total)

const: 6.0ms (1.1% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series169.0ms (0.8%)

Memory

17.5MiB live, 404.5MiB allocated

Counts

28 → 1 068

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))

Outputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos phi1) (cos phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (cos phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1/6 (* (pow phi1 3) (sin phi2)))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* -1/6 (* (pow phi1 3) (sin phi2)))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (cos phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi1 2)))))
(* phi2 (+ (* -1/6 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* 1/120 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2))))))))))
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* (pow phi2 2) (+ (* -1/5040 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* 1/120 (* phi1 (+ 1 (* -1/6 (pow phi1 2)))))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))

Calls

15 calls:

Time	Variable		Point	Expression
31.0ms	phi1	@	-inf	((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (cos phi2) (cos phi1)) (cos lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (- phi2 phi1)) (cos (+ phi2 phi1)))
16.0ms	lambda1	@	inf	((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (cos phi2) (cos phi1)) (cos lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (- phi2 phi1)) (cos (+ phi2 phi1)))
12.0ms	phi1	@	inf	((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (cos phi2) (cos phi1)) (cos lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (- phi2 phi1)) (cos (+ phi2 phi1)))
12.0ms	phi2	@	inf	((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (cos phi2) (cos phi1)) (cos lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (- phi2 phi1)) (cos (+ phi2 phi1)))
11.0ms	lambda2	@	-inf	((+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (acos (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) (* (* (cos phi2) (cos phi1)) (cos lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (sin lambda2) (sin lambda1)) (cos (- lambda1 lambda2)) (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (- phi2 phi1)) (cos (+ phi2 phi1)))

simplify282.0ms (1.4%)

Memory

-4.0MiB live, 367.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	862	22121
1	3025	21797
2	6920	21565
0	9361	20391

Stop Event

1×	iter limit
1×	node limit

Counts

1 068 → 1 068

Calls

Call 1

Inputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos phi1) (cos phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (cos phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1/6 (* (pow phi1 3) (sin phi2)))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* -1/6 (* (pow phi1 3) (sin phi2)))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (cos phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi1 2)))))
(* phi2 (+ (* -1/6 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* 1/120 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2))))))))))
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* (pow phi2 2) (+ (* -1/5040 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* 1/120 (* phi1 (+ 1 (* -1/6 (pow phi1 2)))))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))

Outputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda2)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (.f64 (.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi1)))) lambda1 (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) lambda1) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (.f64 (.f64 #s(literal -1/4 binary64) lambda1) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)))) lambda1))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/12 binary64) lambda1) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))) lambda1 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))) lambda1))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (sin.f64 lambda2) (sin.f64 phi1))) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (sin.f64 phi1)))) #s(literal -1/2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda1 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (sin.f64 phi1))) (.f64 (.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (sin.f64 lambda2) (sin.f64 phi1)))) #s(literal -1/6 binary64))) lambda1 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda1 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* lambda1 (sin lambda2))
(*.f64 (sin.f64 lambda2) lambda1)
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(.f64 (fma.f64 (.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (.f64 lambda1 lambda1) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (.f64 lambda2 lambda2))) (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) lambda2) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 lambda1)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))) lambda2))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/12 binary64) lambda2) (.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))) lambda2 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))))) lambda2))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (sin.f64 lambda1) (sin.f64 phi1))) (/.f64 lambda2 (sin.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (.f64 (/.f64 lambda2 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (sin.f64 phi1)))) #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda2 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (sin.f64 phi1))) (.f64 (/.f64 (.f64 (.f64 (neg.f64 (sin.f64 lambda1)) lambda2) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1/6 binary64))) lambda2 (.f64 (sin.f64 lambda1) (/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda2 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(.f64 (fma.f64 (.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (.f64 lambda2 lambda2) (.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(fma.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) (.f64 phi1 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(.f64 (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (.f64 phi1 phi1) #s(literal 1/120 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/6 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 phi2)) #s(literal 2 binary64)) phi1 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) phi1 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) phi1 #s(literal 2 binary64)) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64))) phi1 #s(literal 2 binary64)) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) phi1))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2)) (*.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 7/180 binary64) (sin.f64 phi2)) (.f64 phi1 phi1) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/7560 binary64) (.f64 phi1 (/.f64 phi1 (sin.f64 phi2))) (/.f64 #s(literal 7/180 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 (sin.f64 phi2) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (sin.f64 phi2)) phi1 (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(fma.f64 (neg.f64 phi1) (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2) (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) phi1) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1/6 (* (pow phi1 3) (sin phi2)))
(.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 3 binary64))) (sin.f64 phi2))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (/.f64 (/.f64 (sin.f64 phi2) phi1) phi1)) (pow.f64 phi1 #s(literal 3 binary64)))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (/.f64 (/.f64 (sin.f64 phi2) phi1) phi1)) (pow.f64 phi1 #s(literal 3 binary64)))
(* (pow phi1 3) (+ (* -1/6 (sin phi2)) (/ (sin phi2) (pow phi1 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (/.f64 (/.f64 (sin.f64 phi2) phi1) phi1)) (pow.f64 phi1 #s(literal 3 binary64)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1/6 (* (pow phi1 3) (sin phi2)))
(.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 3 binary64))) (sin.f64 phi2))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(.f64 (neg.f64 (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (sin.f64 phi2) (/.f64 (neg.f64 (sin.f64 phi2)) (.f64 phi1 phi1))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(.f64 (neg.f64 (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (sin.f64 phi2) (/.f64 (neg.f64 (sin.f64 phi2)) (.f64 phi1 phi1))))
(* -1 (* (pow phi1 3) (+ (* -1 (/ (sin phi2) (pow phi1 2))) (* 1/6 (sin phi2)))))
(.f64 (neg.f64 (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (sin.f64 phi2) (/.f64 (neg.f64 (sin.f64 phi2)) (.f64 phi1 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2))) (.f64 phi2 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2) #s(literal -1/6 binary64))) (.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 phi2 phi2) #s(literal 1/120 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(.f64 (.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi2 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1)))) phi2 (.f64 (.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) (-.f64 (-.f64 (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) phi2 (.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))))) phi2))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) phi2))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 0 binary64) (sin.f64 phi1)) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) phi2 (fma.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) phi2 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) phi2))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1)) (*.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 7/180 binary64) (sin.f64 phi1)) (.f64 phi2 phi2) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 phi2 (/.f64 phi2 (sin.f64 phi1))) #s(literal 31/7560 binary64) (/.f64 #s(literal 7/180 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* phi1 (* phi2 (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1)
(* phi2 (+ (* -1/6 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 phi2 phi2)) (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1)) phi2)
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* 1/120 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2))))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/120 binary64) phi1) (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 phi2 phi2)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1) #s(literal -1/6 binary64))) (.f64 phi2 phi2) (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1)) phi2)
(* phi2 (+ (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (* (pow phi2 2) (+ (* -1/6 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))) (* (pow phi2 2) (+ (* -1/5040 (* phi1 (* (pow phi2 2) (+ 1 (* -1/6 (pow phi1 2)))))) (* 1/120 (* phi1 (+ 1 (* -1/6 (pow phi1 2)))))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) phi1) (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 phi2 phi2)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1) #s(literal 1/120 binary64))) (.f64 phi2 phi2))) (.f64 phi2 phi2) (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1)) phi2)
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 (sin.f64 phi1) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 phi1) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (sin.f64 phi1)) phi2 (cos.f64 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(fma.f64 (neg.f64 phi2) (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) phi2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* phi1 (* (sin phi2) (+ 1 (* -1/6 (pow phi1 2)))))
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))

rewrite325.0ms (1.6%)

Memory

-25.7MiB live, 451.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	483
0	132	473
1	445	398
2	3287	398
0	10036	394

Stop Event

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

Counts

28 → 891

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))

Outputs
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64))) (sin.f64 phi1))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)))
(.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal -1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))))
(/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(exp.f64 (.f64 (log.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(+.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64))))) #s(literal -1 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(pow.f64 (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) R) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))))
(fma.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))) (/.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(-.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(+.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(+.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (neg.f64 (PI.f64)))) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (neg.f64 (PI.f64)))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 #s(literal -1 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal -1 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) #s(literal 0 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 lambda2) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(.f64 (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))) (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))) (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))) (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))) (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))) (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))))
#s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2)))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64))))) #s(literal -1 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(pow.f64 (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) R) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))))
(fma.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))) (/.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(-.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(+.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(+.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R)
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R))
(.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (cbrt.f64 (sqrt.f64 (PI.f64))))
(.f64 (cbrt.f64 (pow.f64 (.f64 (PI.f64) (cbrt.f64 (PI.f64))) #s(literal 2 binary64))) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sqrt.f64 (PI.f64)))) (exp.f64 (log.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (exp.f64 (log.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))) (exp.f64 (log.f64 (cbrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))))
(.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (cbrt.f64 (PI.f64))) #s(literal 2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (.f64 (cbrt.f64 (PI.f64)) (PI.f64))))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (PI.f64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(fabs.f64 (PI.f64))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #s(literal 1/3 binary64)))
(exp.f64 (*.f64 (log.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (log.f64 (PI.f64)))
(log.f64 (exp.f64 (PI.f64)))
(PI.f64)
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64))) (sin.f64 phi1))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)))
(.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal -1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))))
(/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(exp.f64 (.f64 (log.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(+.f64 (fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (pow.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))
(fma.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) #s(literal 2 binary64))
(fma.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))
(fma.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2)) (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(fma.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) #s(literal 2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(+.f64 (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(pow.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)) #s(literal 1 binary64))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (*.f64 (pow.f64 (sin.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64)) (sin.f64 phi1))
(/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64))) (sin.f64 phi1))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64))))) #s(literal -1 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(pow.f64 (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) R) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) #s(literal 3 binary64)))))
(fma.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(fma.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))) (/.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))))
(-.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(+.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(+.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))
(.f64 (sin.f64 phi2) (.f64 phi1 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64))))
(.f64 phi1 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)))
(/.f64 (.f64 (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (sin.f64 phi2) phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (.f64 (fma.f64 (pow.f64 phi1 #s(literal 6 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1)) (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1))))
(/.f64 (.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 phi2) phi1) (fma.f64 (pow.f64 phi1 #s(literal 6 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64))) (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1))))
(fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1) (.f64 (sin.f64 phi2) phi1) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) phi1)))
(fma.f64 (.f64 (sin.f64 phi2) phi1) (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1) (.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 1 binary64)))
(fma.f64 (.f64 (sin.f64 phi2) phi1) #s(literal 1 binary64) (.f64 (.f64 (sin.f64 phi2) phi1) (.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1)))
(fma.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) phi1) (.f64 (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1) (*.f64 (sin.f64 phi2) phi1)))
(+.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1) (.f64 (sin.f64 phi2) phi1)) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) phi1)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) phi1)) (.f64 (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1) (.f64 (sin.f64 phi2) phi1)))
(+.f64 (.f64 (.f64 (sin.f64 phi2) phi1) (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1)) (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 phi2) phi1) (.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(neg.f64 (asin.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))))
(neg.f64 (asin.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R))
(.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(neg.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(-.f64 #s(literal 0 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64) (.f64 #s(literal -2 binary64) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal -2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal -1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal -2 binary64) (.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi1 phi2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(fma.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi1 phi2))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2)))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2)))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2)))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (*.f64 phi2 phi2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (neg.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi1 phi2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2)))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2))))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2)))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 (+.f64 phi1 phi2) (.f64 phi2 phi2))))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))

eval392.0ms (1.9%)

Memory: 35.4MiB live, 688.3MiB allocated
Compiler: Compiled 101 287 to 5 050 computations (95% saved)

prune170.0ms (0.8%)

Memory

22.4MiB live, 420.2MiB allocated

Pruning

84 alts after pruning (82 fresh and 2 done)

	Pruned	Kept	Total
New	2 009	56	2 065
Fresh	19	26	45
Picked	3	2	5
Done	0	0	0
Total	2 031	84	2 115

Accuracy

94.3%

Counts

2 115 → 84

Alt Table

Click to see full alt table

Status	Accuracy	Program
	73.9%	(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
	73.7%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	39.9%	(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
	72.5%	(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	73.1%	(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	71.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	72.6%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	72.9%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
	73.5%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	49.1%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	51.0%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
▶	55.7%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	43.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	39.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
	73.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	44.2%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	39.8%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
	74.1%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	44.9%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	73.8%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 #s(literal 2 binary64) (PI.f64)))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 2 binary64))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R)
	53.7%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	73.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	93.1%	(.f64 (acos.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))) R)
	62.1%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
✓	93.6%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	37.3%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
▶	38.4%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	53.7%	(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	37.9%	(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	61.6%	(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
	61.8%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	74.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
▶	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
	42.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	35.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
	36.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
	36.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
▶	43.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
	45.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	39.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	25.7%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
	28.3%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
	27.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	38.3%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
	42.3%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
	43.7%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
	47.6%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
	55.8%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
	43.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	49.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	51.1%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	37.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
	38.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
	45.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
✓	45.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
	25.6%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
	27.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
	31.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
	33.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
	19.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	18.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
▶	26.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Compiler

Compiled 6 695 to 4 510 computations (32.6% saved)

simplify158.0ms (0.8%)

Memory

-27.7MiB live, 107.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
cost-diff	320	(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff	704	(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
cost-diff	14592	(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff	0	(PI.f64)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (PI.f64))
cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
cost-diff	448	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
cost-diff	0	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff	0	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff	0	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	744
0	123	734
1	196	729
2	345	729
3	655	729
4	1168	729
5	1769	729
6	2586	711
7	5051	711
8	6498	711
0	9513	698

Stop Event

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

Calls

Call 1

Inputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
R
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
R
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
phi2
phi1
#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
R

Outputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
R
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(PI.f64)
R
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) R)
(acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)))
(+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi2 phi1)
phi2
phi1
#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))
#s(literal 1 binary64)
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
R

localize641.0ms (3.1%)

Memory

29.0MiB live, 775.4MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	9.34785899614474	(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
accuracy	13.482093144459116	(cos.f64 (-.f64 phi2 phi1))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	28.105260763969667	#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
accuracy	0.3046875	(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy	0.546186458114042	(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	3.7384329135121925	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
accuracy	26.70542203080814	#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
accuracy	0.22265625	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
accuracy	4.120542659534251	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	27.51981970471489	#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
accuracy	4.120542659534251	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	27.532542800350306	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	27.9280109257556	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	0.15234375	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy	0.17806625976844204	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
accuracy	0.22265625	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
accuracy	4.120542659534251	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))

Samples

547.0ms	246×	1	valid
18.0ms	4×	2	valid
3.0ms	6×	0	valid

Compiler

Compiled 1 386 to 135 computations (90.3% saved)

Precisions

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

ival-cos: 165.0ms (33% of total)

ival-sin: 111.0ms (22.2% of total)

ival-mult: 81.0ms (16.2% of total)

adjust: 62.0ms (12.4% of total)

ival-acos: 26.0ms (5.2% of total)

ival-add: 25.0ms (5% of total)

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

series94.0ms (0.5%)

Memory

1.4MiB live, 161.5MiB allocated

Counts

28 → 1 104

Calls

Call 1

Inputs
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 phi2 phi1))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))

Calls

15 calls:

Time	Variable		Point	Expression
9.0ms	phi1	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (+ phi2 phi1)) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)))
8.0ms	phi2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (+ phi2 phi1)) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)))
7.0ms	lambda2	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (+ phi2 phi1)) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)))
7.0ms	phi1	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (+ phi2 phi1)) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)))
7.0ms	lambda2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* (* 1/2 (PI)) R) (* 1/2 (PI)) (PI) (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))) (* (acos (/ (+ (* (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1)))))) R) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (cos (+ phi2 phi1)) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)))

simplify285.0ms (1.4%)

Memory

7.0MiB live, 281.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	797	22188
1	2716	21838
2	6469	21605
0	8622	20386

Stop Event

1×	iter limit
1×	node limit

Counts

1 104 → 1 104

Calls

Call 1

Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* 1/2 (* R (PI)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(/ 2 (* (sin phi1) (sin phi2)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* 1/2 (* R (PI)))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda2)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2))) lambda1 (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) lambda1) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal -1/4 binary64) lambda1) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 lambda2)))) lambda1))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal -1/12 binary64) lambda1) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (sin.f64 lambda2)))) lambda1 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda1))
(+ 2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (+ (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (sin.f64 lambda2) (sin.f64 phi1))) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda1 (+ (* -1/2 (/ (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (sin.f64 phi1)))) #s(literal -1/2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda1 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/6 (/ (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))) (/ (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (sin.f64 phi1))) (.f64 (.f64 (/.f64 lambda1 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (sin.f64 lambda2) (sin.f64 phi1)))) #s(literal -1/6 binary64))) lambda1 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda1 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) lambda2) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 lambda1)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda2))
(+ (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))))) (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal 1/12 binary64) lambda2) (.f64 (neg.f64 (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) lambda2 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda2))
(+ 2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (+ (* -1 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (sin.f64 lambda1) (sin.f64 phi1))) (/.f64 lambda2 (sin.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (/ (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (.f64 (/.f64 lambda2 (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (sin.f64 phi1)))) #s(literal -1/2 binary64) (.f64 (sin.f64 lambda1) (/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda2 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(+ 2 (+ (* lambda2 (+ (* -1 (/ (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* lambda2 (+ (* -1/2 (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))) (* 1/6 (/ (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (sin.f64 phi1))) (.f64 (/.f64 (.f64 (.f64 (neg.f64 (sin.f64 lambda1)) lambda2) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1/6 binary64))) lambda2 (.f64 (sin.f64 lambda1) (/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) lambda2 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) phi1 (sin.f64 phi2)) phi1 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(.f64 (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (.f64 phi1 phi1) #s(literal 1/120 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/6 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (sin.f64 phi2)) phi1)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* 1/2 (* phi1 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 2 binary64) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2)))))))) (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (.f64 #s(literal 2 binary64) (sin.f64 phi2)))) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* phi1 (+ (* 1/2 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* phi1 (+ (* 1/2 (* phi1 (+ (* -1/6 (* (sin phi2) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* (sin phi2) (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))))) (* 1/2 (+ (* -1/3 (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi2) (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 phi2)) #s(literal 2 binary64)) phi1 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) phi1 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (* phi1 (sin phi2))))
(.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) phi1)
(/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64)) phi1 #s(literal 2 binary64)) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64))) phi1)
(/ (+ (* 2 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2))) (* phi1 (- (+ (* -1 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))) (* phi1 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2)))) (sin phi2))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))) (sin phi2)))))) (* -1/3 (/ (* (cos phi2) (cos (- lambda2 lambda1))) (sin phi2))))))))) phi1)
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal -2/3 binary64))) phi1 #s(literal 2 binary64)) phi1 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64))) phi1)
(/ 2 (* phi1 (sin phi2)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) phi1))
(/ (+ (* 1/3 (/ (pow phi1 2) (sin phi2))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2)) (*.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(/ (+ (* (pow phi1 2) (+ (* 7/180 (/ (pow phi1 2) (sin phi2))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 7/180 binary64) (sin.f64 phi2)) (.f64 phi1 phi1) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(/ (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 31/7560 (/ (pow phi1 2) (sin phi2))) (* 7/180 (/ 1 (sin phi2))))) (* 1/3 (/ 1 (sin phi2))))) (* 2 (/ 1 (sin phi2)))) phi1)
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/7560 binary64) (.f64 phi1 (/.f64 phi1 (sin.f64 phi2))) (/.f64 #s(literal 7/180 binary64) (sin.f64 phi2))) (.f64 phi1 phi1) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (/.f64 #s(literal 2 binary64) (sin.f64 phi2))) phi1)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1))) (.f64 phi1 phi1) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1))) (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(fma.f64 (neg.f64 phi1) (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2) (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) phi1) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 (sin.f64 phi2) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) phi2 (sin.f64 phi1)) phi2 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2) #s(literal -1/6 binary64))) (.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 phi2 phi2) #s(literal 1/120 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (sin.f64 phi1)) phi2)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (sin.f64 phi1)) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(.f64 (.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* phi2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))))
(.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))))) (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi2 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1)))) phi2 (.f64 (.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (* 1/2 (* (sin phi1) (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* phi2 (+ (* 1/2 (* phi2 (* (sin phi1) (- (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* -1/6 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1)))))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))))) (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi1) phi2) (-.f64 (-.f64 (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) phi2 (.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))))) phi2))
(/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (* phi2 (sin phi1)))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) phi2))
(/ (+ (* phi2 (+ 2 (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1)) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ (+ (* phi2 (+ 2 (+ (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))) (* phi2 (- (+ (* phi2 (- (* -1 (/ (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1))))) (sin phi1))) (* 1/6 (/ (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1)))) (sin phi1))))) (/ (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (sin phi1))) (* -1/6 (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1)))))))) (/ (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))) (sin phi1))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 0 binary64) (sin.f64 phi1)) (/.f64 #s(literal 0 binary64) (sin.f64 phi1))) phi2 (fma.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))) phi2 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (sin.f64 phi1)))) phi2 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))) phi2)
(/ 2 (* phi2 (sin phi1)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) phi2))
(/ (+ (* 1/3 (/ (pow phi2 2) (sin phi1))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1)) (*.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(/ (+ (* (pow phi2 2) (+ (* 7/180 (/ (pow phi2 2) (sin phi1))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 7/180 binary64) (sin.f64 phi1)) (.f64 phi2 phi2) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(/ (+ (* (pow phi2 2) (+ (* (pow phi2 2) (+ (* 31/7560 (/ (pow phi2 2) (sin phi1))) (* 7/180 (/ 1 (sin phi1))))) (* 1/3 (/ 1 (sin phi1))))) (* 2 (/ 1 (sin phi1)))) phi2)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 phi2 (/.f64 phi2 (sin.f64 phi1))) #s(literal 31/7560 binary64) (/.f64 #s(literal 7/180 binary64) (sin.f64 phi1))) (.f64 phi2 phi2) (/.f64 #s(literal 1/3 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (/.f64 #s(literal 2 binary64) (sin.f64 phi1))) phi2)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (.f64 phi2 phi2) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(fma.f64 (neg.f64 phi2) (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) phi2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 (sin.f64 phi1) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/2 binary64) (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) phi2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(fma.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/ 2 (* (sin phi1) (sin phi2)))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* R (acos (* 1/2 (* (sin phi1) (* (sin phi2) (+ 2 (/ (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))) (* (sin phi1) (sin phi2)))))))))
(.f64 (acos.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (sin.f64 phi2)))) R)
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))
(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(.f64 (neg.f64 R) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))

rewrite389.0ms (1.9%)

Memory

17.8MiB live, 243.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	502
0	123	467
1	423	462
2	2946	462
0	9553	450

Stop Event

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

Counts

28 → 752

Calls

Call 1

Inputs
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 phi2 phi1))

Outputs
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal -1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal -1 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal -1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64))
(*.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal -1 binary64))
(pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal -1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(exp.f64 (neg.f64 (.f64 (log.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64))))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) (/.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) R)
(.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64))))) #s(literal -1 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(pow.f64 (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) R) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)) (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (-.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))))) (fma.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) #s(literal 3 binary64)))))
(fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))) (/.f64 (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64)) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))))
(-.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
(+.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)) (.f64 (*.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(+.f64 (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64))
(.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64))
(.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R)
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(.f64 #s(literal 1/2 binary64) (.f64 (PI.f64) R))
(.f64 R (.f64 (PI.f64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (cbrt.f64 (sqrt.f64 (PI.f64))))
(.f64 (cbrt.f64 (pow.f64 (.f64 (PI.f64) (cbrt.f64 (PI.f64))) #s(literal 2 binary64))) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sqrt.f64 (PI.f64)))) (exp.f64 (log.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (exp.f64 (log.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))) (exp.f64 (log.f64 (cbrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))))
(.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (cbrt.f64 (PI.f64))) #s(literal 2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (.f64 (cbrt.f64 (PI.f64)) (PI.f64))))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(fabs.f64 (PI.f64))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (PI.f64) #s(literal 3 binary64))) #s(literal 1/3 binary64)))
(exp.f64 (*.f64 (log.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (log.f64 (PI.f64)))
(log.f64 (exp.f64 (PI.f64)))
(PI.f64)
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64))) (sin.f64 phi1))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal -1 binary64)))
(.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))
(.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal -1 binary64))
(/.f64 (/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64))) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))))
(/.f64 (.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))))
(/.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(exp.f64 (.f64 (log.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64)) (pow.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (pow.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) #s(literal 2 binary64))
(fma.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (sin.f64 phi2)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 2 binary64))
(fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (sin.f64 phi1)) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2)) (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(fma.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) #s(literal 2 binary64))
(fma.f64 (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)))
(*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(pow.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 1 binary64))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1))
(/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi1)) (sin.f64 phi2))
(/.f64 (*.f64 (pow.f64 (sin.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64)) (sin.f64 phi1))
(/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 phi2) #s(literal -1 binary64))) (sin.f64 phi1))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))
(.f64 (acos.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) R)
(.f64 R (acos.f64 (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 16 binary64))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(.f64 (.f64 R #s(literal -1 binary64)) (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(.f64 #s(literal -1 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
(.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R))
(.f64 R (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(neg.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
(-.f64 #s(literal 0 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R))
#s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal -2 binary64) (.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))) (*.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal -2 binary64) (.f64 #s(literal 1 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64) (.f64 #s(literal -2 binary64) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal -2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (sin.f64 phi2)) (sin.f64 phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2)) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)) (sin.f64 phi2))))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(fma.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (/.f64 (sin.f64 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (neg.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1)))))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1)))))))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))

eval400.0ms (1.9%)

Memory: -1.0MiB live, 382.9MiB allocated
Compiler: Compiled 94 361 to 5 444 computations (94.2% saved)

prune228.0ms (1.1%)

Memory

17.9MiB live, 487.6MiB allocated

Pruning

103 alts after pruning (102 fresh and 1 done)

	Pruned	Kept	Total
New	1 930	44	1 974
Fresh	19	58	77
Picked	4	1	5
Done	2	0	2
Total	1 955	103	2 058

Accuracy

94.3%

Counts

2 058 → 103

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
	73.9%	(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
	55.6%	(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
	73.7%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	55.6%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	30.4%	(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
	54.4%	(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	54.9%	(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	53.6%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	55.1%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	55.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	73.5%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
	55.7%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	49.1%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	51.0%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	42.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	43.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	25.3%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	43.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	73.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	44.2%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	25.4%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	74.1%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	43.9%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	44.9%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	26.2%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	73.8%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 #s(literal 2 binary64) (PI.f64)))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 2 binary64))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R)
	53.7%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	73.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
▶	62.1%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	55.8%	(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	93.4%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))) R)
	22.0%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	53.7%	(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	38.4%	(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	37.9%	(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	61.6%	(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
	61.8%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	74.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
✓	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
	42.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	54.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
▶	45.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
	35.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
	36.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
	36.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
	45.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
▶	31.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	39.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	28.3%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
	57.3%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
	27.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	38.5%	(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
	38.3%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
	42.3%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
	43.7%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
	47.6%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
	55.8%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
▶	93.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	51.1%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
	43.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	49.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	37.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
	38.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
	45.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
	31.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
	33.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
	19.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	26.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	25.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	31.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	13.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
	31.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	31.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))) R)
	25.6%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
	31.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))) R)
	18.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	11.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
	11.6%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
	12.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
	16.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
▶	17.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

Compiler

Compiled 8 357 to 5 637 computations (32.5% saved)

simplify113.0ms (0.5%)

Memory

8.8MiB live, 121.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
cost-diff	0	(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
cost-diff	0	(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
cost-diff	0	(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff	0	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
cost-diff	0	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
cost-diff	0	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
cost-diff	0	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
cost-diff	0	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
cost-diff	0	(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
cost-diff	0	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff	0	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff	0	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	848
0	116	845
1	174	845
2	283	845
3	591	845
4	1239	845
5	2132	845
6	3514	845
7	3896	845
8	6395	845
0	8492	836

Stop Event

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

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(cos.f64 phi2)
R
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
#s(literal 1/2 binary64)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi2 phi2)
#s(literal 1 binary64)
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi1)
R

Outputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(cos.f64 phi2)
R
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi2 phi1)
phi2
phi1
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(sin.f64 phi1)
R
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi2 phi2)
#s(literal 1 binary64)
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi1)
R

localize810.0ms (3.9%)

Memory

-179.6MiB live, 884.7MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.15234375	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy	0.22265625	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
accuracy	4.120542659534251	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
accuracy	30.215837876081597	#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))
accuracy	4.120542659534251	(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	13.30001502936633	(cos.f64 (+.f64 phi2 phi1))
accuracy	13.482093144459116	(cos.f64 (-.f64 phi2 phi1))
accuracy	14.356625421472934	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.22265625	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
accuracy	4.120542659534251	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
accuracy	26.70542203080814	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
accuracy	27.51981970471489	#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
accuracy	4.120542659534251	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
accuracy	26.70542203080814	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
accuracy	27.532542800350306	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
accuracy	27.9280109257556	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
accuracy	0.11328125	(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy	0.15234375	(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy	0.22265625	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy	4.120542659534251	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))

Samples

718.0ms	246×	1	valid
14.0ms	4×	2	valid
3.0ms	6×	0	valid

Compiler

Compiled 1 465 to 130 computations (91.1% saved)

Precisions

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

ival-cos: 440.0ms (66.5% of total)

ival-mult: 74.0ms (11.2% of total)

ival-sin: 61.0ms (9.2% of total)

adjust: 29.0ms (4.4% of total)

ival-acos: 27.0ms (4.1% of total)

ival-add: 19.0ms (2.9% of total)

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

exact: 1.0ms (0.2% of total)

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

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

series91.0ms (0.4%)

Memory

1.6MiB live, 150.7MiB allocated

Counts

27 → 1 164

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (cos phi2))
(+ (* -1 (* phi1 (+ (sin phi2) (* -1 (sin phi2))))) (* 2 (cos phi2)))
(+ (* 2 (cos phi2)) (* phi1 (- (* -1 (* phi1 (cos phi2))) (+ (sin phi2) (* -1 (sin phi2))))))
(+ (* 2 (cos phi2)) (* phi1 (- (* phi1 (+ (* -1 (cos phi2)) (* -1 (* phi1 (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))) (+ (sin phi2) (* -1 (sin phi2))))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (* phi2 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/6 (sin phi1))))))))))
(+ (cos phi1) (cos (neg phi1)))
(+ (cos phi1) (+ (cos (neg phi1)) (* -1 (* phi2 (+ (sin phi1) (sin (neg phi1)))))))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (+ (sin phi1) (sin (neg phi1)))))))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1 (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (+ (sin phi1) (sin (neg phi1)))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))

Calls

15 calls:

Time	Variable		Point	Expression
15.0ms	phi1	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) R) (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi2) (sin phi1)) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
9.0ms	lambda2	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) R) (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi2) (sin phi1)) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
9.0ms	phi2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) R) (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi2) (sin phi1)) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
6.0ms	lambda2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) R) (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi2) (sin phi1)) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
5.0ms	lambda1	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos phi1)) (* (sin phi2) (sin phi1))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos (- lambda1 lambda2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin phi1) (sin phi2)) (* (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) R) (acos (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1)))) (+ (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (sin phi2) (sin phi1)) (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- phi2 phi1)) (cos (+ phi2 phi1)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))

simplify261.0ms (1.3%)

Memory

-4.2MiB live, 444.8MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	675	23047
1	2307	22630
2	7717	22515
0	8190	21017

Stop Event

1×	iter limit
1×	node limit

Counts

1 164 → 1 164

Calls

Call 1

Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (neg lambda2)))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(* 2 (cos phi2))
(+ (* -1 (* phi1 (+ (sin phi2) (* -1 (sin phi2))))) (* 2 (cos phi2)))
(+ (* 2 (cos phi2)) (* phi1 (- (* -1 (* phi1 (cos phi2))) (+ (sin phi2) (* -1 (sin phi2))))))
(+ (* 2 (cos phi2)) (* phi1 (- (* phi1 (+ (* -1 (cos phi2)) (* -1 (* phi1 (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))) (+ (sin phi2) (* -1 (sin phi2))))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (* phi2 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/6 (sin phi1))))))))))
(+ (cos phi1) (cos (neg phi1)))
(+ (cos phi1) (+ (cos (neg phi1)) (* -1 (* phi2 (+ (sin phi1) (sin (neg phi1)))))))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (+ (sin phi1) (sin (neg phi1)))))))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1 (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (+ (sin phi1) (sin (neg phi1)))))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))

Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda2)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))) (* (cos phi1) (cos (neg lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2))) lambda1 (.f64 (sin.f64 lambda2) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 lambda1 (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* -1/4 (* lambda1 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (cos.f64 lambda2) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1/4 binary64) lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda1 (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda1 (+ (* 1/2 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda1 (+ (* -1/4 (* (cos lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/12 (* lambda1 (* (sin lambda2) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/12 binary64) lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) lambda1 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(fma.f64 (.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (.f64 lambda1 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) lambda1 (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi1))) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1)) lambda1 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (+ lambda2 (* -1 lambda1))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1)))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (sin.f64 lambda1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1/2 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))) (+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* -1/4 (* lambda2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (cos.f64 lambda1) (fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda2 (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (+ (* lambda2 (+ (* -1/2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* lambda2 (+ (* -1/4 (* (cos (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* 1/12 (* lambda2 (* (sin (neg lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))))))))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/12 binary64) lambda2) (neg.f64 (sin.f64 lambda1))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) lambda2)) lambda2 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda1) (cos phi2))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))
(fma.f64 (.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) lambda2 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2)) lambda2 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/6 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/6 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/6 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/6 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2)) phi1 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2)))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi2) (* -1 (sin phi2))))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))) (* -1/6 (sin phi2))))))))) (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) #s(literal 0 binary64)) phi1)) phi1 (sin.f64 phi2)) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(* 2 (cos phi2))
(*.f64 #s(literal 2 binary64) (cos.f64 phi2))
(+ (* -1 (* phi1 (+ (sin phi2) (* -1 (sin phi2))))) (* 2 (cos phi2)))
(fma.f64 #s(literal 2 binary64) (cos.f64 phi2) #s(literal 0 binary64))
(+ (* 2 (cos phi2)) (* phi1 (- (* -1 (* phi1 (cos phi2))) (+ (sin phi2) (* -1 (sin phi2))))))
(fma.f64 (.f64 (neg.f64 phi1) (cos.f64 phi2)) phi1 (.f64 #s(literal 2 binary64) (cos.f64 phi2)))
(+ (* 2 (cos phi2)) (* phi1 (- (* phi1 (+ (* -1 (cos phi2)) (* -1 (* phi1 (+ (* -1/6 (sin phi2)) (* 1/6 (sin phi2))))))) (+ (sin phi2) (* -1 (sin phi2))))))
(fma.f64 (.f64 (neg.f64 phi1) (cos.f64 phi2)) phi1 (.f64 #s(literal 2 binary64) (cos.f64 phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/6 binary64)) (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1 (sin.f64 phi2)) phi1 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 (sin.f64 phi2) phi1)
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (sin.f64 phi2) phi1))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 (sin.f64 phi2) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) phi1) #s(literal -1/2 binary64) (sin.f64 phi2)) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 phi2)) phi1 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (sin.f64 phi2)) phi1 (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(fma.f64 (neg.f64 phi1) (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 (fma.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (cos.f64 phi2) (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (sin.f64 phi2)) phi1 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) phi1 (neg.f64 (sin.f64 phi2))) phi1 (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))
(+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi2 (* -1 phi1))) (cos (- phi2 (* -1 phi1))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/6 binary64)) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/6 binary64)) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/6 binary64)) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/6 binary64)) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))) phi2 (sin.f64 phi1)) phi2 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))))) phi2)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1)))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) phi2))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos phi1) (cos (neg phi1))))) (* phi2 (+ (sin phi1) (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (sin phi1) (sin (neg phi1))))) (* phi2 (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (* phi2 (+ (* -1/2 (* (cos (- lambda2 lambda1)) (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (* -1/6 (sin phi1))))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1 binary64))) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) #s(literal 0 binary64)) phi2)) phi2 (sin.f64 phi1)) phi2))
(+ (cos phi1) (cos (neg phi1)))
(*.f64 #s(literal 2 binary64) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (neg phi1)) (* -1 (* phi2 (+ (sin phi1) (sin (neg phi1)))))))
(fma.f64 #s(literal 0 binary64) phi2 (*.f64 #s(literal 2 binary64) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1))))) (+ (sin phi1) (sin (neg phi1)))))))
(fma.f64 #s(literal 2 binary64) (cos.f64 phi1) (.f64 (fma.f64 (.f64 (cos.f64 phi1) #s(literal -1 binary64)) phi2 #s(literal 0 binary64)) phi2))
(+ (cos phi1) (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1 (* phi2 (+ (* -1/6 (sin phi1)) (* -1/6 (sin (neg phi1)))))) (+ (* -1/2 (cos phi1)) (* -1/2 (cos (neg phi1)))))) (+ (sin phi1) (sin (neg phi1)))))))
(fma.f64 #s(literal 2 binary64) (cos.f64 phi1) (.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) phi2 (.f64 (cos.f64 phi1) #s(literal -1 binary64))) phi2 #s(literal 0 binary64)) phi2))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/6 binary64)) (sin.f64 phi1) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi2 (sin.f64 phi1)) phi2 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))))) phi2)
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) phi2 (sin.f64 phi1)) phi2 (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) phi2) (neg.f64 (sin.f64 phi1)) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (sin.f64 phi1)) phi2 (cos.f64 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(fma.f64 (neg.f64 phi2) (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) phi2 (neg.f64 (sin.f64 phi1))) phi2 (cos.f64 phi1))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (.f64 (pow.f64 phi2 #s(literal 4 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (+ phi1 phi2)) (cos (- phi2 phi1))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (+ phi1 phi2)) (cos (- phi2 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* 1/2 (* (cos (- lambda2 lambda1)) (+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (cos (neg (+ phi1 (* -1 phi2)))) (cos (- phi1 (* -1 phi2))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))

rewrite219.0ms (1.1%)

Memory

-2.7MiB live, 383.7MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	666
0	116	558
1	383	546
2	2687	546
0	8628	540

Stop Event

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

Counts

27 → 595

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))))

Outputs
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal -2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1 binary64))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1 binary64))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) (/.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))
(+.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 R (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal -2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1 binary64))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1 binary64))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64))) (.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) #s(literal 1 binary64))) (.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(.f64 (.f64 #s(literal 2 binary64) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (*.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi2 phi1)) (.f64 (cos.f64 (-.f64 phi1 phi2)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal 4 binary64) (.f64 (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (cos.f64 (+.f64 phi2 phi1)) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 4 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (cos.f64 (+.f64 phi2 phi1)) (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 4 binary64) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (fma.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (cos.f64 (+.f64 phi2 phi1)) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (fma.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64) (.f64 #s(literal 2 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal 4 binary64) (.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (cos.f64 (-.f64 phi1 phi2)) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 4 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (cos.f64 (-.f64 phi1 phi2)) (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (fma.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64) (.f64 #s(literal 4 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 16 binary64))
(/.f64 (fma.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 8 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(-.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))
(+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (cos.f64 (+.f64 phi2 phi1))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (-.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (pow.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (/.f64 (pow.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(+.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(.f64 R (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (.f64 (cos.f64 phi2) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal -2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -2 binary64) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64) (pow.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1 binary64))) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal -2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(fma.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (neg.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (neg.f64 (sin.f64 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1)))))) (.f64 (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi2 phi2 (.f64 phi1 (+.f64 phi2 phi1)))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(fma.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))) (.f64 (sin.f64 (/.f64 (.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))

eval279.0ms (1.3%)

Memory: 14.2MiB live, 604.9MiB allocated
Compiler: Compiled 93 724 to 4 182 computations (95.5% saved)

prune255.0ms (1.2%)

Memory

14.5MiB live, 620.8MiB allocated

Pruning

106 alts after pruning (103 fresh and 3 done)

	Pruned	Kept	Total
New	1 825	23	1 848
Fresh	17	80	97
Picked	3	2	5
Done	0	1	1
Total	1 845	106	1 951

Accuracy

94.3%

Counts

1 951 → 106

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
	73.9%	(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
	55.6%	(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
	73.7%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	55.6%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	30.4%	(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
	54.4%	(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	54.9%	(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	53.6%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	55.1%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	55.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	73.5%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
	55.7%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	93.3%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	49.1%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	51.0%	(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	42.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	43.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	25.3%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	43.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	73.1%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	44.2%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	25.4%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	74.1%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	43.9%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
	31.6%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
	44.9%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	26.2%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	17.1%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
	73.8%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 #s(literal 2 binary64) (PI.f64)))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 2 binary64))) R)
	73.9%	(.f64 (/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
	73.9%	(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R)
	53.7%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	73.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	31.8%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	43.3%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	46.7%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	45.6%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	46.6%	(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	62.0%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
	74.2%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	31.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	45.1%	(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	93.4%	(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))) R)
	38.4%	(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	61.6%	(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
	61.8%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	74.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓	93.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
	42.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	54.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
	35.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
	36.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
	36.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
	45.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
	39.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	28.3%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
	45.6%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
	25.4%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	26.3%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	18.4%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
	27.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	38.5%	(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
	43.7%	(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
	37.8%	(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
	47.6%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	55.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
✓	93.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	51.1%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	55.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	45.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
	36.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
	35.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
	43.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	49.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	38.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
	34.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
	31.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
	33.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
	19.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
	26.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	25.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	31.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	13.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
	31.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	31.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))) R)
	31.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))) R)
	18.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	11.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
	11.6%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
	12.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
	16.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
✓	17.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

Compiler

Compiled 11 167 to 3 954 computations (64.6% saved)

regimes594.0ms (2.9%)

Memory

-32.4MiB live, 1 018.9MiB allocated

Counts

174 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))) R)
(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(/.f64 (.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) R) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (PI.f64) R) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) #s(literal 2 binary64))) (fma.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 1 binary64)))) R)
(.f64 (acos.f64 (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))))))) R)
(.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))) R)
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64))) R) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (/.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
(.f64 (/.f64 (fma.f64 (PI.f64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (PI.f64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 2 binary64))) R)
(.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) R)
(.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) (PI.f64)) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 #s(literal 2 binary64) (PI.f64)))) R)

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Calls

10 calls:

116.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.0ms	(cos.f64 (-.f64 lambda1 lambda2))
65.0ms	phi1
51.0ms	lambda2
48.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))

Results

Accuracy	Segments	Branch
93.6%	1	`R`
93.6%	1	`lambda1`
93.6%	1	`lambda2`
93.6%	1	`phi1`
93.6%	1	`phi2`
93.6%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
93.6%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
93.6%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
93.6%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
93.6%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes465.0ms (2.2%)

Memory

39.7MiB live, 815.7MiB allocated

Counts

151 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)

Calls

10 calls:

58.0ms	R
54.0ms	lambda2
49.0ms	lambda1
46.0ms	phi2
44.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))

Results

Accuracy	Segments	Branch
93.5%	1	`R`
93.5%	1	`lambda2`
93.5%	1	`phi1`
93.5%	1	`phi2`
93.5%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
93.5%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
93.5%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
93.5%	1	`(-.f64 lambda1 lambda2)`
93.5%	1	`lambda1`
93.5%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes465.0ms (2.2%)

Memory

5.8MiB live, 690.2MiB allocated

Counts

137 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Calls

10 calls:

81.0ms	(-.f64 lambda1 lambda2)
64.0ms	(cos.f64 (-.f64 lambda1 lambda2))
49.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.0ms	lambda2
39.0ms	phi2

Results

Accuracy	Segments	Branch
93.5%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
93.5%	1	`R`
93.5%	1	`lambda1`
93.5%	1	`lambda2`
93.5%	1	`phi1`
93.5%	1	`phi2`
93.5%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
93.5%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
93.5%	1	`(-.f64 lambda1 lambda2)`
93.5%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes472.0ms (2.3%)

Memory

-14.0MiB live, 730.7MiB allocated

Counts

136 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (.f64 (.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 (.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 #s(literal -2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 #s(approx (cos (- phi2 phi1)) (cos.f64 phi2)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 (.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)

Calls

10 calls:

76.0ms	lambda1
61.0ms	(-.f64 lambda1 lambda2)
48.0ms	phi1
45.0ms	(cos.f64 (-.f64 lambda1 lambda2))
41.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Results

Accuracy	Segments	Branch
74.2%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
74.2%	1	`R`
84.2%	3	`phi1`
83.3%	3	`phi2`
74.2%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
74.2%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
74.2%	1	`(-.f64 lambda1 lambda2)`
77.0%	2	`lambda1`
77.2%	2	`lambda2`
74.2%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes44.0ms (0.2%)

Memory

-14.0MiB live, 90.8MiB allocated

Counts

116 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi2 phi1) phi2) phi1) #s(literal 1/2 binary64))) (cos.f64 (.f64 (-.f64 phi2 (-.f64 phi1 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) R))
(.f64 (acos.f64 (/.f64 #s(approx (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2)) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) phi1)) phi1)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) phi2)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 phi1)) phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)

Calls

1 calls:

38.0ms

phi1

Results

Accuracy	Segments	Branch
84.2%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes31.0ms (0.1%)

Memory

22.9MiB live, 61.4MiB allocated

Counts

99 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)

Calls

1 calls:

26.0ms

phi1

Results

Accuracy	Segments	Branch
84.2%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes33.0ms (0.2%)

Memory

3.1MiB live, 77.3MiB allocated

Counts

97 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(fma.f64 (.f64 (PI.f64) R) #s(literal 1/2 binary64) (.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (neg.f64 R)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) R (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (neg.f64 R)))
(.f64 (acos.f64 (-.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))) R)
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R) (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)

Calls

1 calls:

27.0ms

phi1

Results

Accuracy	Segments	Branch
84.2%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes44.0ms (0.2%)

Memory

-26.1MiB live, 50.1MiB allocated

Counts

74 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)

Calls

1 calls:

27.0ms

phi1

Results

Accuracy	Segments	Branch
84.2%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes151.0ms (0.7%)

Memory

35.5MiB live, 155.3MiB allocated

Counts

73 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

Calls

4 calls:

56.0ms	phi1
38.0ms	lambda2
33.0ms	lambda1
19.0ms	phi2

Results

Accuracy	Segments	Branch
76.8%	3	`lambda1`
77.2%	3	`lambda2`
77.7%	3	`phi2`
77.2%	3	`phi1`

Compiler

Compiled 4 to 20 computations (-400% saved)

regimes453.0ms (2.2%)

Memory

-19.9MiB live, 309.4MiB allocated

Counts

70 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 #s(approx (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos phi2)) (.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)

Calls

10 calls:

117.0ms	phi2
32.0ms	lambda1
31.0ms	lambda2
26.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
21.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
76.8%	3	`lambda1`
67.6%	3	`phi1`
76.0%	3	`lambda2`
63.7%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
59.1%	3	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
59.1%	3	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
58.1%	2	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
63.7%	2	`(-.f64 lambda1 lambda2)`
58.1%	2	`R`
75.0%	3	`phi2`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes66.0ms (0.3%)

Memory

-7.5MiB live, 67.5MiB allocated

Counts

65 → 3

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)

Calls

3 calls:

23.0ms	phi2
22.0ms	lambda1
17.0ms	lambda2

Results

Accuracy	Segments	Branch
72.4%	3	`phi2`
59.4%	3	`lambda2`
71.1%	3	`lambda1`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes20.0ms (0.1%)

Memory

21.4MiB live, 21.4MiB allocated

Counts

64 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)

Calls

1 calls:

17.0ms

phi2

Results

Accuracy	Segments	Branch
70.6%	2	`phi2`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes132.0ms (0.6%)

Memory

-29.8MiB live, 89.0MiB allocated

Counts

63 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi1) phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (acos.f64 (fma.f64 #s(approx (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (.f64 #s(literal 2 binary64) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (.f64 (sin.f64 phi1) phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) phi1) (sin.f64 phi2))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)

Calls

5 calls:

32.0ms	(cos.f64 (-.f64 lambda1 lambda2))
22.0ms	phi1
17.0ms	phi2
16.0ms	lambda1
16.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
49.4%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
52.0%	3	`(-.f64 lambda1 lambda2)`
62.1%	2	`phi1`
50.5%	3	`lambda1`
62.2%	2	`phi2`

Compiler

Compiled 10 to 28 computations (-180% saved)

regimes25.0ms (0.1%)

Memory

25.5MiB live, 25.5MiB allocated

Counts

42 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)

Outputs

(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)

Calls

2 calls:

11.0ms	phi2
11.0ms	phi1

Results

Accuracy	Segments	Branch
62.0%	2	`phi1`
62.0%	2	`phi2`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes30.0ms (0.1%)

Memory

-10.3MiB live, 27.6MiB allocated

Counts

41 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (/ (+ ( (* (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (cos (- lambda2 lambda1))) (/ 1 (* (sin phi2) (sin phi1)))) 2) (* 2 (/ 1 (* (sin phi2) (sin phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 1/2 binary64)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 phi2 (sin.f64 phi1))) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 phi2)) phi1)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (+ (cos (- phi2 phi1)) (cos (+ phi2 phi1))) (* 1/2 (cos (- lambda2 lambda1)))) (* (sin phi2) (sin phi1))) (fma.f64 (sin.f64 phi2) phi1 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) #s(approx (* (+ (* (* -1/6 phi1) phi1) 1) (* (sin phi2) phi1)) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2) phi1))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) phi2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R)

Calls

2 calls:

16.0ms	phi2
11.0ms	phi1

Results

Accuracy	Segments	Branch
61.8%	2	`phi1`
61.7%	2	`phi2`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes65.0ms (0.3%)

Memory

13.8MiB live, 51.8MiB allocated

Counts

13 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)

Outputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)

Calls

10 calls:

23.0ms	R
5.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
5.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
5.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
4.0ms	phi1

Results

Accuracy	Segments	Branch
45.0%	1	`lambda1`
45.0%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
45.0%	1	`(-.f64 lambda1 lambda2)`
45.0%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
45.0%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
45.0%	1	`lambda2`
45.0%	1	`R`
45.0%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
45.0%	1	`phi2`
45.0%	1	`phi1`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes77.0ms (0.4%)

Memory

-3.5MiB live, 80.3MiB allocated

Counts

12 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R)

Calls

10 calls:

22.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
20.0ms	phi2
5.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
4.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
35.9%	2	`(-.f64 lambda1 lambda2)`
45.0%	2	`lambda1`
45.1%	2	`lambda2`
33.5%	1	`phi2`
40.6%	2	`phi1`
33.5%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
37.8%	3	`(cos.f64 (-.f64 lambda1 lambda2))`
33.5%	1	`R`
33.5%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
33.5%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes14.0ms (0.1%)

Memory

-26.5MiB live, 12.3MiB allocated

Counts

9 → 2

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)

Calls

2 calls:

10.0ms	lambda1
3.0ms	lambda2

Results

Accuracy	Segments	Branch
33.5%	1	`lambda1`
40.7%	2	`lambda2`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes48.0ms (0.2%)

Memory

21.7MiB live, 61.0MiB allocated

Counts

8 → 1

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)

Calls

10 calls:

18.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
3.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
3.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
3.0ms	lambda2
3.0ms	R

Results

Accuracy	Segments	Branch
26.2%	1	`lambda1`
26.2%	1	`phi2`
26.2%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
26.2%	1	`R`
26.2%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
26.2%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
26.2%	1	`(-.f64 lambda1 lambda2)`
26.2%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
26.2%	1	`phi1`
26.2%	1	`lambda2`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes52.0ms (0.2%)

Memory

-1.1MiB live, 40.7MiB allocated

Counts

2 → 2

Calls

Call 1

Inputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)

Calls

10 calls:

36.0ms	phi1
2.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
2.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
26.2%	2	`lambda2`
17.2%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
17.2%	1	`phi2`
19.3%	2	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
26.2%	2	`lambda1`
19.3%	2	`R`
18.7%	2	`phi1`
17.2%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
19.1%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
17.2%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes15.0ms (0.1%)

Memory

-15.4MiB live, 24.1MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

Calls

7 calls:

6.0ms	(cos.f64 (-.f64 lambda1 lambda2))
2.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
1.0ms	(-.f64 lambda1 lambda2)
1.0ms	lambda2
1.0ms	phi1

Results

Accuracy	Segments	Branch
17.2%	1	`(-.f64 lambda1 lambda2)`
17.2%	1	`phi1`
17.2%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
17.2%	1	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
17.2%	1	`R`
17.2%	1	`lambda1`
17.2%	1	`lambda2`

Compiler

Compiled 30 to 50 computations (-66.7% saved)

bsearch141.0ms (0.7%)

Memory

12.1MiB live, 132.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
86.0ms	6.175746124410447e-36	8.293411850261088e-35
49.0ms	-8.283176950964364e-10	-1.8115174757713407e-10

Samples

120.0ms	165×	1	valid
5.0ms	27×	0	valid

Compiler

Compiled 766 to 655 computations (14.5% saved)

Precisions

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

ival-cos: 57.0ms (49.2% of total)

ival-sin: 33.0ms (28.5% of total)

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

ival-acos: 8.0ms (6.9% of total)

adjust: 6.0ms (5.2% of total)

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

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

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

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

bsearch110.0ms (0.5%)

Memory

-20.1MiB live, 97.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.175746124410447e-36	8.293411850261088e-35
91.0ms	-2.223142592965625e-16	-1.7124770564614514e-19

Samples

81.0ms	107×	1	valid
4.0ms	21×	0	valid

Compiler

Compiled 976 to 789 computations (19.2% saved)

Precisions

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

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

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

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

ival-acos: 5.0ms (6.4% of total)

adjust: 4.0ms (5.1% of total)

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

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

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

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

bsearch4.0ms (0%)

Memory

5.9MiB live, 5.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.175746124410447e-36	8.293411850261088e-35
1.0ms	-2.223142592965625e-16	-1.7124770564614514e-19

Compiler

Compiled 1 072 to 845 computations (21.2% saved)

bsearch3.0ms (0%)

Memory

4.5MiB live, 4.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.175746124410447e-36	8.293411850261088e-35
1.0ms	-2.223142592965625e-16	-1.7124770564614514e-19

Compiler

Compiled 1 054 to 827 computations (21.5% saved)

bsearch3.0ms (0%)

Memory

4.8MiB live, 4.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.175746124410447e-36	8.293411850261088e-35
1.0ms	-2.223142592965625e-16	-1.7124770564614514e-19

Compiler

Compiled 1 156 to 893 computations (22.8% saved)

bsearch173.0ms (0.8%)

Memory

9.8MiB live, 168.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
74.0ms	6.307751602353315e-6	305564839641.28876
89.0ms	-0.0004498437153393438	-2.2023316021454665e-26

Samples

118.0ms	246×	1	valid
27.0ms	90×	0	valid

Compiler

Compiled 1 538 to 1 229 computations (20.1% saved)

Precisions

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

ival-cos: 54.0ms (45.5% of total)

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

ival-mult: 16.0ms (13.5% of total)

ival-acos: 11.0ms (9.3% of total)

adjust: 9.0ms (7.6% of total)

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

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

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

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

bsearch132.0ms (0.6%)

Memory

14.9MiB live, 210.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
78.0ms	0.028657638025514128	1.0696767945739646e+52
46.0ms	-3.724327785550411e-6	-2.348990278961208e-8

Samples

78.0ms	159×	1	valid
31.0ms	145×	0	valid

Compiler

Compiled 1 276 to 1 051 computations (17.6% saved)

Precisions

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

ival-cos: 41.0ms (42.5% of total)

ival-sin: 25.0ms (25.9% of total)

ival-mult: 12.0ms (12.4% of total)

ival-acos: 8.0ms (8.3% of total)

adjust: 6.0ms (6.2% of total)

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

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

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

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

bsearch107.0ms (0.5%)

Memory

-21.3MiB live, 145.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
38.0ms	6.307751602353315e-6	305564839641.28876
64.0ms	-0.8236716882047919	-0.0004498437153393438

Samples

63.0ms	133×	1	valid
15.0ms	59×	0	valid

Compiler

Compiled 1 150 to 957 computations (16.8% saved)

Precisions

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

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

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

ival-acos: 12.0ms (17.3% of total)

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

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

adjust: 7.0ms (10.1% of total)

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

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

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

bsearch2.0ms (0%)

Memory

4.1MiB live, 4.1MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	6.307751602353315e-6	305564839641.28876

Compiler

Compiled 622 to 525 computations (15.6% saved)

bsearch18.0ms (0.1%)

Memory

-13.7MiB live, 24.2MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
16.0ms	6.307751602353315e-6	305564839641.28876

Samples

12.0ms	20×	1	valid
2.0ms	12×	0	valid

Compiler

Compiled 562 to 485 computations (13.7% saved)

Precisions

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

adjust: 4.0ms (32.5% of total)

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

ival-sin: 2.0ms (16.2% of total)

ival-mult: 1.0ms (8.1% of total)

ival-acos: 1.0ms (8.1% of total)

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

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

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

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

bsearch2.0ms (0%)

Memory

3.7MiB live, 3.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.307751602353315e-6	305564839641.28876

Compiler

Compiled 562 to 485 computations (13.7% saved)

bsearch35.0ms (0.2%)

Memory

12.2MiB live, 50.2MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
33.0ms	-0.027565367957674523	-0.01305693493562818

Samples

23.0ms	53×	1	valid
7.0ms	27×	0	valid

Compiler

Compiled 292 to 255 computations (12.7% saved)

Precisions

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

ival-cos: 8.0ms (30.9% of total)

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

ival-sin: 6.0ms (23.1% of total)

adjust: 2.0ms (7.7% of total)

ival-acos: 2.0ms (7.7% of total)

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

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

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

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

bsearch39.0ms (0.2%)

Memory

10.1MiB live, 47.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
37.0ms	4.977048347161818e-9	4.2324450200658896e-8

Samples

20.0ms	51×	1	valid
12.0ms	45×	0	valid

Compiler

Compiled 382 to 301 computations (21.2% saved)

Precisions

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

ival-cos: 13.0ms (45.5% of total)

ival-sin: 6.0ms (21% of total)

ival-mult: 4.0ms (14% of total)

ival-acos: 3.0ms (10.5% of total)

adjust: 2.0ms (7% of total)

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

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

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

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

bsearch79.0ms (0.4%)

Memory

-17.5MiB live, 101.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
75.0ms	3296228269287080400.0	2.199723736490882e+23

Samples

61.0ms	132×	1	valid
3.0ms	12×	0	valid

Compiler

Compiled 607 to 439 computations (27.7% saved)

Precisions

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

ival-cos: 27.0ms (47.6% of total)

ival-sin: 11.0ms (19.4% of total)

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

adjust: 5.0ms (8.8% of total)

ival-acos: 5.0ms (8.8% of total)

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

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

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

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

bsearch52.0ms (0.3%)

Memory

0.1MiB live, 81.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
49.0ms	4.2324450200658896e-8	7.12488386820117e-7

Samples

29.0ms	71×	1	valid
8.0ms	41×	0	valid

Compiler

Compiled 512 to 347 computations (32.2% saved)

Precisions

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

ival-cos: 12.0ms (37.4% of total)

ival-sin: 7.0ms (21.8% of total)

ival-mult: 4.0ms (12.5% of total)

ival-acos: 4.0ms (12.5% of total)

adjust: 2.0ms (6.2% of total)

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

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

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

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

simplify33.0ms (0.2%)

Memory

20.9MiB live, 99.7MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	202	1501
1	261	1501
2	268	1501
3	272	1501
4	274	1501

Stop Event

1×

saturated

Calls

Call 1

Inputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 phi1 #s(literal -7930553376671967/9671406556917033397649408 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -944473296573929/295147905179352825856 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 2582544170319337/36893488147419103232 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)))
(if (<=.f64 lambda1 #s(literal -7177997053961861/9444732965739290427392 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 lambda1 #s(literal 8358680908399641/288230376151711744 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -4796153459164483/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)))
(if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(if (<=.f64 phi1 #s(literal -3804640965202595/288230376151711744 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(if (<=.f64 lambda2 #s(literal 3022314549036573/75557863725914323419136 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R))
(if (<=.f64 lambda2 #s(literal 54000000000000000000 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(if (<=.f64 lambda2 #s(literal 419110025354681/1180591620717411303424 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

Outputs
(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 R (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(if (<=.f64 phi1 #s(literal -7930553376671967/9671406556917033397649408 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -7930553376671967/9671406556917033397649408 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi1 #s(literal -8924260225606735/40564819207303340847894502572032 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 7669960592712579/93536104789177786765035829293842113257979682750464 binary64)) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -944473296573929/295147905179352825856 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 2582544170319337/36893488147419103232 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -944473296573929/295147905179352825856 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (if (<=.f64 phi2 #s(literal 2582544170319337/36893488147419103232 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ ( (* (* (cos phi2) (cos phi1)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda2) (sin lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) R)))
(if (<=.f64 lambda1 #s(literal -7177997053961861/9444732965739290427392 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 lambda1 #s(literal 8358680908399641/288230376151711744 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)))
(if (<=.f64 lambda1 #s(literal -7177997053961861/9444732965739290427392 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (if (<=.f64 lambda1 #s(literal 8358680908399641/288230376151711744 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)))
(if (<=.f64 phi2 #s(literal -4796153459164483/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R)))
(if (<=.f64 phi2 #s(literal -4796153459164483/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 1152921504606847/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(if (<=.f64 phi2 #s(literal 5902958103587057/36893488147419103232 binary64)) (.f64 (acos.f64 (+.f64 #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(if (<=.f64 phi1 #s(literal -3804640965202595/288230376151711744 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) R)
(if (<=.f64 lambda2 #s(literal 3022314549036573/75557863725914323419136 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) R))
(if (<=.f64 lambda2 #s(literal 54000000000000000000 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) R) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(if (<=.f64 lambda2 #s(literal 419110025354681/1180591620717411303424 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)

soundness1.5s (7.2%)

Memory

43.6MiB live, 1 394.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	219	4017
1	686	3929
2	2187	3840
3	3632	3804
4	8000	3804
0	8218	3588
0	75	483
0	132	473
1	445	398
2	3287	398
0	10036	394
0	862	22121
1	3025	21797
2	6920	21565
0	9361	20391
0	797	22188
1	2716	21838
2	6469	21605
0	8622	20386
0	17	71
0	29	71
1	83	71
2	554	71
3	7204	71
0	8426	68

Stop Event

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

Compiler

Compiled 2 521 to 1 092 computations (56.7% saved)

preprocess236.0ms (1.1%)

Memory

4.9MiB live, 566.2MiB allocated

Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 4 000 to 1 128 computations (71.8% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

Iter	Nodes	Cost
0	17	92
0	29	92
1	38	92
2	50	92
3	58	92
4	67	92
5	83	92
6	116	92
7	141	92
8	185	92
9	201	92
10	209	92
0	209	89

Iter	Nodes	Cost
0	17	92
0	29	92
1	38	92
2	50	92
3	58	92
4	67	92
5	83	92
6	116	92
7	141	92
8	185	92
9	201	92
10	209	92
0	209	89

start0.0ms (0%)

analyze947.0ms (4.6%)

sample5.7s (27.5%)

explain361.0ms (1.7%)

preprocess237.0ms (1.1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify7.0ms (0%)

localize155.0ms (0.7%)

series35.0ms (0.2%)

simplify279.0ms (1.3%)

rewrite184.0ms (0.9%)

eval175.0ms (0.8%)

prune122.0ms (0.6%)

simplify145.0ms (0.7%)

localize896.0ms (4.3%)

series169.0ms (0.8%)

simplify282.0ms (1.4%)

rewrite325.0ms (1.6%)

eval392.0ms (1.9%)

prune170.0ms (0.8%)

simplify158.0ms (0.8%)

localize641.0ms (3.1%)

series94.0ms (0.5%)

simplify285.0ms (1.4%)

rewrite389.0ms (1.9%)

eval400.0ms (1.9%)

prune228.0ms (1.1%)

simplify113.0ms (0.5%)

localize810.0ms (3.9%)

series91.0ms (0.4%)

simplify261.0ms (1.3%)

rewrite219.0ms (1.1%)

eval279.0ms (1.3%)

prune255.0ms (1.2%)

regimes594.0ms (2.9%)

regimes465.0ms (2.2%)

regimes465.0ms (2.2%)

regimes472.0ms (2.3%)

regimes44.0ms (0.2%)

regimes31.0ms (0.1%)

regimes33.0ms (0.2%)

regimes44.0ms (0.2%)

regimes151.0ms (0.7%)

regimes453.0ms (2.2%)

regimes66.0ms (0.3%)

regimes20.0ms (0.1%)

regimes132.0ms (0.6%)

regimes25.0ms (0.1%)

regimes30.0ms (0.1%)

regimes65.0ms (0.3%)

regimes77.0ms (0.4%)

regimes14.0ms (0.1%)

regimes48.0ms (0.2%)

regimes52.0ms (0.2%)

regimes15.0ms (0.1%)

bsearch141.0ms (0.7%)

bsearch110.0ms (0.5%)

bsearch4.0ms (0%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch173.0ms (0.8%)

bsearch132.0ms (0.6%)

bsearch107.0ms (0.5%)

bsearch2.0ms (0%)

bsearch18.0ms (0.1%)

bsearch2.0ms (0%)

bsearch35.0ms (0.2%)

bsearch39.0ms (0.2%)

bsearch79.0ms (0.4%)

bsearch52.0ms (0.3%)

simplify33.0ms (0.2%)

soundness1.5s (7.2%)

preprocess236.0ms (1.1%)

end0.0ms (0%)

Profiling

Iter	Nodes	Cost
0	17	92
0	29	92
1	38	92
2	50	92
3	58	92
4	67	92
5	83	92
6	116	92
7	141	92
8	185	92
9	201	92
10	209	92
0	209	89